/ Acorn RISC PD-CD 1 / Acorn RISC PD-CD 1.iso / schools / _polymos / polymos

< prev

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1a 20 f4 20 3e | 24 2e 21 50 6f 6c 79 6d |.... . >|$.!Polym|
|00000010| 6f 73 2e 50 6f 6c 79 6d | 6f 73 0d 00 0b 17 20 f4 |os.Polym|os.... .|
|00000020| 20 42 79 20 53 69 6d 6f | 6e 20 41 6e 74 68 6f 6e | By Simo|n Anthon|
|00000030| 79 0d 00 0c 16 20 f4 20 | 36 32 20 52 75 74 6c 61 |y.... . |62 Rutla|
|00000040| 6e 64 20 52 70 61 64 0d | 00 0d 15 20 f4 20 57 65 |nd Rpad.|... . We|
|00000050| 73 74 20 42 72 69 64 67 | 66 6f 72 64 0d 00 0e 11 |st Bridg|ford....|
|00000060| 20 f4 20 4e 6f 74 74 69 | 6e 67 68 61 6d 0d 00 0f | . Notti|ngham...|
|00000070| 12 20 f4 20 30 36 30 32 | 20 38 31 37 34 30 39 0d |. . 0602| 817409.|
|00000080| 00 10 37 20 f4 20 56 65 | 72 73 69 6f 6e 73 20 66 |..7 . Ve|rsions f|
|00000090| 6f 72 20 61 6c 6c 20 42 | 42 43 20 72 61 6e 67 65 |or all B|BC range|
|000000a0| 73 20 61 76 61 69 6c 61 | 62 6c 65 20 62 79 20 72 |s availa|ble by r|
|000000b0| 65 71 75 65 73 74 0d 00 | 14 22 20 53 48 49 46 54 |equest..|." SHIFT|
|000000c0| 3d 31 3a 4f 75 74 4f 66 | 47 72 69 64 25 3d 30 3a |=1:OutOf|Grid%=0:|
|000000d0| 4f 6e 54 6f 70 25 3d 30 | 0d 00 1e 1b 20 52 32 3d |OnTop%=0|.... R2=|
|000000e0| 33 30 3a 42 32 3d 33 30 | 3a 47 32 3d 37 30 3a 56 |30:B2=30|:G2=70:V|
|000000f0| 25 3d 30 0d 00 28 0c 20 | 4c 3d 30 3a 70 3d 31 0d |%=0..(. |L=0:p=1.|
|00000100| 00 32 2a 20 2a 4b 45 59 | 31 2a 44 49 52 20 3c 50 |.2* *KEY|1*DIR <P|
|00000110| 6f 6c 79 24 44 69 72 3e | 7c 4d 2a 43 4f 4e 2e 46 |oly$Dir>||M*CON.F|
|00000120| 4f 4e 54 53 2e 31 30 7c | 4d 0d 00 3c 17 20 2a 4b |ONTS.10||M..<. *K|
|00000130| 45 59 31 32 20 50 52 4f | 43 45 72 72 6f 72 7c 4d |EY12 PRO|CError|M|
|00000140| 0d 00 46 10 20 2a 4b 45 | 59 31 31 20 50 52 4f 43 |..F. *KE|Y11 PROC|
|00000150| 0d 00 50 0d 20 f4 20 2a | 4e 4f 44 49 52 0d 00 5a |..P. . *|NODIR..Z|
|00000160| 32 20 57 61 69 74 3d 31 | 30 30 30 3a 4e 3d 31 3a |2 Wait=1|000:N=1:|
|00000170| 62 25 3d 2d 31 3a 46 3d | 35 3a 58 3d 30 3a 59 3d |b%=-1:F=|5:X=0:Y=|
|00000180| 30 3a 43 25 3d 39 3a 44 | 65 6c 65 74 65 3d 30 0d |0:C%=9:D|elete=0.|
|00000190| 00 64 18 20 de 5a 24 28 | 32 33 34 30 29 2c 54 25 |.d. .Z$(|2340),T%|
|000001a0| 28 32 33 34 30 29 3a 0d | 00 6e 1d 20 ee 85 3a e7 |(2340):.|.n. ..:.|
|000001b0| 9f 3d 31 32 39 3a e5 8d | 74 5e 42 3a 8b 20 f2 45 |.=129:..|t^B:. .E|
|000001c0| 72 72 6f 72 0d 00 78 25 | 20 4f 3d 31 3a 66 25 3d |rror..x%| O=1:f%=|
|000001d0| 37 3a 49 3d 36 3a 45 3d | 32 3a 4a 3d 34 3a 4b 25 |7:I=6:E=|2:J=4:K%|
|000001e0| 3d 30 3a 53 49 5a 45 3d | 31 0d 00 82 23 20 4d 3d |=0:SIZE=|1...# M=|
|000001f0| 30 3a 56 3d 35 3a 57 3d | 30 3a 57 57 3d 31 35 3a |0:V=5:W=|0:WW=15:|
|00000200| 57 57 57 3d 31 3a 2a 46 | 58 34 2c 31 0d 00 8c 0e |WWW=1:*F|X4,1....|
|00000210| 20 d1 3d 30 3a 2a 4b 45 | 59 30 0d 00 96 36 20 de | .=0:*KE|Y0...6 .|
|00000220| 55 28 31 38 29 2c 41 28 | 34 29 2c 42 28 34 29 2c |U(18),A(|4),B(4),|
|00000230| 43 28 34 29 2c 44 28 34 | 29 2c 41 25 28 35 29 2c |C(4),D(4|),A%(5),|
|00000240| 58 28 34 29 2c 59 28 34 | 29 2c 51 24 28 35 29 3a |X(4),Y(4|),Q$(5):|
|00000250| 0d 00 a0 c2 20 eb 31 32 | 3a ef 31 39 2c 30 2c 31 |.... .12|:.19,0,1|
|00000260| 36 2c 52 32 2c 47 32 2c | 42 32 3a ef 31 39 2c 30 |6,R2,G2,|B2:.19,0|
|00000270| 2c 32 34 2c 52 32 2c 47 | 32 2c 42 32 3a 43 31 3d |,24,R2,G|2,B2:C1=|
|00000280| 36 30 30 3a 43 32 3d 31 | 30 30 3a 43 33 3d 37 30 |600:C2=1|00:C3=70|
|00000290| 30 3a 53 49 5a 45 3d 31 | 3a f2 50 72 69 6e 74 28 |0:SIZE=1|:.Print(|
|000002a0| 22 27 50 4f 4c 59 4d 4f | 53 2c 20 61 20 6d 69 6e |"'POLYMO|S, a min|
|000002b0| 64 20 67 61 6d 65 27 22 | 2c 33 30 30 2c 36 30 30 |d game'"|,300,600|
|000002c0| 29 3a 53 49 5a 45 3d 32 | 3a 43 31 3d 37 30 30 3a |):SIZE=2|:C1=700:|
|000002d0| 43 32 3d 33 30 30 3a 43 | 33 3d 33 30 30 3a f2 50 |C2=300:C|3=300:.P|
|000002e0| 72 69 6e 74 28 22 62 79 | 20 53 69 6d 6f 6e 20 52 |rint("by| Simon R|
|000002f0| 2e 20 41 6e 74 68 6f 6e | 79 2e 22 2c 34 30 30 2c |. Anthon|y.",400,|
|00000300| 33 35 30 29 3a d1 3d 30 | 3a f5 3a fd 20 91 3e 33 |350):.=0|:.:. .>3|
|00000310| 30 30 0d 00 aa 0f 20 db | 3a 2a 46 58 20 31 35 2c |00.... .|:*FX 15,|
|00000320| 30 0d 00 b4 22 20 f2 53 | 65 74 75 70 3a ef 35 3a |0..." .S|etup:.5:|
|00000330| f2 53 3a f2 53 65 74 75 | 70 3a 43 3d 58 25 3a 44 |.S:.Setu|p:C=X%:D|
|00000340| 3d 59 25 0d 00 be 5a 20 | eb 31 32 3a ef 31 39 2c |=Y%...Z |.12:.19,|
|00000350| 30 2c 31 36 2c 52 32 2c | 47 32 2c 42 32 3a ef 31 |0,16,R2,|G2,B2:.1|
|00000360| 39 2c 30 2c 32 34 2c 52 | 32 2c 47 32 2c 42 32 3a |9,0,24,R|2,G2,B2:|
|00000370| f2 53 65 74 75 70 3a f2 | 46 49 4c 4c 47 52 49 44 |.Setup:.|FILLGRID|
|00000380| 3a f2 47 72 69 64 3a f2 | 43 48 45 53 53 3a f2 52 |:.Grid:.|CHESS:.R|
|00000390| 3a f2 53 65 74 46 6c 69 | 70 4d 65 6e 75 0d 00 c8 |:.SetFli|pMenu...|
|000003a0| 17 20 f5 20 e7 20 61 25 | 3d 31 20 8c 20 2a 46 58 |. . . a%|=1 . *FX|
|000003b0| 32 31 2c 30 0d 00 d2 1e | 20 f2 50 69 63 6b 3a e7 |21,0....| .Pick:.|
|000003c0| 20 55 28 4e 25 29 3d 4e | 25 20 f2 55 73 65 64 3a | U(N%)=N|% .Used:|
|000003d0| fd 30 0d 00 dc 31 20 e7 | 20 4e 25 3d 31 36 20 84 |.0...1 .| N%=16 .|
|000003e0| 20 4e 25 3d 31 37 20 84 | 20 4e 25 3d 31 38 3a f2 | N%=17 .| N%=18:.|
|000003f0| 53 65 74 47 72 69 64 44 | 69 72 65 63 74 6f 72 79 |SetGridD|irectory|
|00000400| 3a fd 30 0d 00 e6 60 20 | e7 20 4e 25 3d 31 33 20 |:.0...` |. N%=13 |
|00000410| 8c 20 43 25 3d 39 3a 44 | 25 3d ac 20 44 25 3a 46 |. C%=9:D|%=. D%:F|
|00000420| 25 3d 44 25 2b 31 3a 55 | 25 3d 31 3a f2 42 6c 61 |%=D%+1:U|%=1:.Bla|
|00000430| 6e 6b 4d 65 6e 75 3a f2 | 53 65 74 46 6c 69 70 4d |nkMenu:.|SetFlipM|
|00000440| 65 6e 75 3a 43 25 3d 31 | 33 20 8b 20 e7 20 4e 25 |enu:C%=1|3 . . N%|
|00000450| 3d 31 34 20 8c 20 f2 44 | 65 6c 65 74 65 3a e5 8d |=14 . .D|elete:..|
|00000460| 64 52 40 0d 00 f0 0a 20 | e6 33 2c 49 3a 0d 00 fa |dR@.... |.3,I:...|
|00000470| 44 20 f4 20 53 74 61 72 | 74 20 70 6f 73 69 74 69 |D . Star|t positi|
|00000480| 6f 6e 20 6f 66 20 70 69 | 65 63 65 73 20 77 68 65 |on of pi|eces whe|
|00000490| 6e 20 66 69 72 73 74 20 | 63 68 6f 73 65 6e 20 66 |n first |chosen f|
|000004a0| 6f 72 20 65 61 63 68 20 | 67 72 69 64 20 73 69 7a |or each |grid siz|
|000004b0| 65 0d 01 04 74 20 e7 20 | 56 25 3d 31 20 8c 20 58 |e...t . |V%=1 . X|
|000004c0| 3d 43 2b 28 33 2a 57 25 | 29 3a 59 3d 44 2b 28 48 |=C+(3*W%|):Y=D+(H|
|000004d0| 25 2b 31 29 2a 57 25 2d | 33 2a 57 25 20 8b 20 e7 |%+1)*W%-|3*W% . .|
|000004e0| 20 56 25 3d 32 20 8c 20 | 58 3d 43 2b 28 34 2a 57 | V%=2 . |X=C+(4*W|
|000004f0| 25 29 3a 59 3d 44 2b 28 | 48 25 2b 31 29 2a 57 25 |%):Y=D+(|H%+1)*W%|
|00000500| 2d 33 2a 57 25 3a 8b 58 | 3d 43 2b 28 32 2a 57 25 |-3*W%:.X|=C+(2*W%|
|00000510| 2a 56 25 29 3a 59 3d 44 | 2b 28 48 25 2b 31 29 2a |*V%):Y=D|+(H%+1)*|
|00000520| 57 25 2d 57 25 0d 01 0e | 32 20 e7 20 56 25 3e 34 |W%-W%...|2 . V%>4|
|00000530| 20 84 20 56 25 3d 30 20 | 8c 20 58 3d 43 2b 28 32 | . V%=0 |. X=C+(2|
|00000540| 2a 57 25 29 3a 59 3d 44 | 2b 28 48 25 2b 31 29 2a |*W%):Y=D|+(H%+1)*|
|00000550| 57 25 2d 31 2a 57 25 0d | 01 18 1d 20 58 3d 58 2b |W%-1*W%.|... X=X+|
|00000560| 28 46 25 2a 33 2a 57 25 | 29 3a 47 25 3d 58 3a 4a |(F%*3*W%|):G%=X:J|
|00000570| 25 3d 59 3a 0d 01 22 0b | 20 f2 44 72 61 77 3a 0d |%=Y:..".| .Draw:.|
|00000580| 01 2c 25 20 e7 20 4e 25 | 3d 31 35 20 80 20 54 25 |.,% . N%|=15 . T%|
|00000590| 3d 30 20 61 25 3d 30 3a | 2a 46 58 31 33 38 2c 30 |=0 a%=0:|*FX138,0|
|000005a0| 2c 31 33 30 0d 01 36 20 | 20 e7 20 54 25 3d 31 32 |,130..6 | . T%=12|
|000005b0| 20 80 20 61 25 3d 30 20 | 61 25 3d 31 3a 2a 46 58 | . a%=0 |a%=1:*FX|
|000005c0| 32 31 2c 30 0d 01 40 0f | 20 e7 20 4e 25 3d 31 35 |21,0..@.| . N%=15|
|000005d0| 20 fd 30 0d 01 4a 16 20 | f5 20 e7 61 25 3d 31 20 | .0..J. |. .a%=1 |
|000005e0| 8c 20 2a 46 58 32 31 2c | 30 0d 01 54 70 20 e7 20 |. *FX21,|0..Tp . |
|000005f0| 58 3c 30 20 84 20 58 3e | 31 32 38 30 20 84 20 59 |X<0 . X>|1280 . Y|
|00000600| 3c 30 20 84 20 59 3e 31 | 31 30 30 20 84 20 4f 6e |<0 . Y>1|100 . On|
|00000610| 54 6f 70 25 3d 31 20 84 | 20 4f 75 74 4f 66 47 72 |Top%=1 .| OutOfGr|
|00000620| 69 64 25 3d 31 20 f2 44 | 72 61 77 3a 58 3d 47 25 |id%=1 .D|raw:X=G%|
|00000630| 3a 59 3d 4a 25 3a 55 25 | 3d 30 3a f2 52 3a f2 44 |:Y=J%:U%|=0:.R:.D|
|00000640| 72 61 77 3a 4f 6e 54 6f | 70 25 3d 30 3a 4f 75 74 |raw:OnTo|p%=0:Out|
|00000650| 4f 66 47 72 69 64 25 3d | 30 0d 01 5e 10 20 e7 4e |OfGrid%=|0..^. .N|
|00000660| 25 3c 3e 31 33 43 25 3d | a5 0d 01 68 77 20 e7 20 |%<>13C%=|...hw . |
|00000670| 28 43 25 3c 31 34 30 20 | 80 20 43 25 3e 31 33 34 |(C%<140 |. C%>134|
|00000680| 29 20 84 20 43 25 3d 31 | 20 84 20 43 25 3d 33 32 |) . C%=1| . C%=32|
|00000690| 20 84 20 43 25 3d 31 33 | 20 84 20 43 25 3d 36 38 | . C%=13| . C%=68|
|000006a0| 20 84 20 43 25 3d 38 35 | 20 84 20 43 25 3d 37 36 | . C%=85| . C%=76|
|000006b0| 20 84 20 43 25 3d 38 32 | 20 84 20 43 25 3d 38 34 | . C%=82| . C%=84|
|000006c0| 20 84 20 43 25 3d 37 30 | 20 84 20 43 25 3d 39 20 | . C%=70| . C%=9 |
|000006d0| 8c 20 43 25 3d 43 25 20 | 8b 20 e5 20 8d 44 40 41 |. C%=C% |. . .D@A|
|000006e0| 0d 01 72 13 20 e7 20 43 | 25 3d 37 30 20 8c 20 43 |..r. . C|%=70 . C|
|000006f0| 25 3d 39 0d 01 7c 62 20 | e7 4e 25 3c 3e 31 33 f2 |%=9..|b |.N%<>13.|
|00000700| 43 68 65 63 6b 50 65 69 | 63 65 73 3a e7 4f 75 74 |CheckPei|ces:.Out|
|00000710| 4f 66 47 72 69 64 25 3d | 31 84 4f 6e 54 6f 70 25 |OfGrid%=|1.OnTop%|
|00000720| 3d 31 fd 30 8b e7 54 25 | 3d 31 32 80 4e 25 3c 3e |=1.0..T%|=12.N%<>|
|00000730| 31 36 80 4e 25 3c 3e 31 | 37 80 61 25 3c 3e 30 20 |16.N%<>1|7.a%<>0 |
|00000740| f2 57 69 6e 3a f2 4e 65 | 77 47 61 6d 65 3a db 3a |.Win:.Ne|wGame:.:|
|00000750| e5 8d 74 74 40 0d 01 86 | 2a 20 e7 43 25 3d 33 32 |..tt@...|* .C%=32|
|00000760| f2 44 72 61 77 3a 55 25 | 3d 30 3a 55 28 4e 25 29 |.Draw:U%|=0:U(N%)|
|00000770| 3d 30 3a f2 42 4c 41 4e | 4b 3a e5 8d 64 48 40 0d |=0:.BLAN|K:..dH@.|
|00000780| 01 90 8f 20 e7 43 25 3d | 39 3a 51 3d 58 3a 52 3d |... .C%=|9:Q=X:R=|
|00000790| 59 3a 67 25 3d 55 25 3a | f2 44 72 61 77 3a 5a 3d |Y:g%=U%:|.Draw:Z=|
|000007a0| 4e 25 3a 44 25 3d ac 44 | 25 3a 46 25 3d 44 25 2b |N%:D%=.D|%:F%=D%+|
|000007b0| 31 3a f2 42 6c 61 6e 6b | 4d 65 6e 75 3a 55 28 4e |1:.Blank|Menu:U(N|
|000007c0| 25 29 3d 30 3a f2 53 65 | 74 46 6c 69 70 4d 65 6e |%)=0:.Se|tFlipMen|
|000007d0| 75 3a 6f 25 3d 30 3a 4e | 25 3d 5a 3a 55 25 3d 67 |u:o%=0:N|%=Z:U%=g|
|000007e0| 25 3a f2 52 3a e6 33 2c | 49 3a 58 3d 51 2b 28 58 |%:.R:.3,|I:X=Q+(X|
|000007f0| 28 34 29 2a 33 29 3a 59 | 3d 52 2b 28 59 28 34 29 |(4)*3):Y|=R+(Y(4)|
|00000800| 2a 33 29 3a e6 33 2c 49 | 3a f2 44 72 61 77 0d 01 |*3):.3,I|:.Draw..|
|00000810| 9a 14 20 fd 43 25 3d 31 | 33 84 4e 25 3d 31 33 3a |.. .C%=1|3.N%=13:|
|00000820| fd 30 0d 01 a4 13 20 dd | f2 53 65 74 46 6c 69 70 |.0.... .|.SetFlip|
|00000830| 4d 65 6e 75 3a 0d 01 ae | 1d 20 ef 35 3a 55 25 3d |Menu:...|. .5:U%=|
|00000840| 30 3a 57 25 3d 35 30 3a | f2 52 3a 58 3d 30 3a 59 |0:W%=50:|.R:X=0:Y|
|00000850| 3d 30 0d 01 b8 1c 20 e7 | 20 46 25 3d 30 20 8c 20 |=0.... .| F%=0 . |
|00000860| f7 20 8d 64 60 41 20 8b | 20 f7 8d 64 6a 41 0d 01 |. .d`A .| ..djA..|
|00000870| c2 0b 20 53 49 5a 45 3d | 32 0d 01 cc 34 20 e3 20 |.. SIZE=|2...4 . |
|00000880| 4e 25 3d 31 20 b8 20 31 | 32 3a f3 20 41 25 2c 42 |N%=1 . 1|2:. A%,B|
|00000890| 25 3a 58 3d 58 2b 41 25 | 3a 59 3d 59 2b 42 25 3a |%:X=X+A%|:Y=Y+B%:|
|000008a0| ec 20 58 2c 59 3a f2 4d | 65 6e 75 3a ed 0d 01 d6 |. X,Y:.M|enu:....|
|000008b0| 6f 20 58 3d 30 3a 59 3d | 30 3a ea 20 50 25 3a 57 |o X=0:Y=|0:. P%:W|
|000008c0| 25 3d 49 25 3a e7 20 43 | 25 3c 3e 39 20 8c 20 53 |%=I%:. C|%<>9 . S|
|000008d0| 49 5a 45 3d 31 3a e1 20 | 8b 20 e3 20 4e 25 3d 31 |IZE=1:. |. . N%=1|
|000008e0| 20 b8 20 31 32 3a f3 20 | 41 25 2c 42 25 2c 43 24 | . 12:. |A%,B%,C$|
|000008f0| 3a 58 3d 41 25 3a 59 3d | 59 2b 42 25 3a f2 50 72 |:X=A%:Y=|Y+B%:.Pr|
|00000900| 69 6e 74 28 43 24 2c 58 | 2b 31 35 2c 59 2d 33 30 |int(C$,X|+15,Y-30|
|00000910| 29 3a ed 3a 53 49 5a 45 | 3d 31 3a e1 0d 01 e0 d8 |):.:SIZE|=1:.....|
|00000920| 20 dc 32 30 2c 38 37 30 | 2c 33 30 30 2c 30 2c 31 | .20,870|,300,0,1|
|00000930| 35 30 2c 30 2c 32 35 30 | 2c 30 2c 32 30 30 2c 35 |50,0,250|,0,200,5|
|00000940| 30 2c 32 30 30 2c 2d 35 | 30 2c 2d 31 30 35 30 2c |0,200,-5|0,-1050,|
|00000950| 2d 32 30 30 2c 32 30 30 | 2c 30 2c 32 30 30 2c 30 |-200,200|,0,200,0|
|00000960| 2c 32 30 30 2c 35 30 2c | 32 30 30 2c 2d 35 30 2c |,200,50,|200,-50,|
|00000970| 32 30 30 2c 30 2c 31 32 | 30 2c 38 36 30 2c 22 31 |200,0,12|0,860,"1|
|00000980| 22 2c 33 32 30 2c 30 2c | 22 32 22 2c 35 31 35 2c |",320,0,|"2",515,|
|00000990| 30 2c 22 33 22 2c 37 37 | 30 2c 30 2c 22 34 22 2c |0,"3",77|0,0,"4",|
|000009a0| 39 37 30 2c 30 2c 22 35 | 22 2c 31 31 37 30 2c 30 |970,0,"5|",1170,0|
|000009b0| 2c 22 36 22 2c 31 32 30 | 2c 2d 32 31 30 2c 22 37 |,"6",120|,-210,"7|
|000009c0| 22 2c 33 32 30 2c 30 2c | 22 38 22 2c 35 31 35 2c |",320,0,|"8",515,|
|000009d0| 30 2c 22 39 22 2c 37 30 | 30 2c 30 2c 22 30 22 2c |0,"9",70|0,0,"0",|
|000009e0| 39 32 30 2c 30 2c 22 2d | 22 2c 31 31 35 30 2c 30 |920,0,"-|",1150,0|
|000009f0| 2c 22 3d 22 0d 01 ea d9 | 20 dc 32 37 30 2c 38 37 |,"="....| .270,87|
|00000a00| 30 2c 31 35 30 2c 30 2c | 32 35 30 2c 30 2c 32 30 |0,150,0,|250,0,20|
|00000a10| 30 2c 30 2c 32 30 30 2c | 35 30 2c 32 30 30 2c 2d |0,0,200,|50,200,-|
|00000a20| 35 30 2c 2d 31 30 35 30 | 2c 2d 32 31 30 2c 32 30 |50,-1050|,-210,20|
|00000a30| 30 2c 30 2c 32 30 30 2c | 30 2c 32 30 30 2c 35 30 |0,0,200,|0,200,50|
|00000a40| 2c 32 30 30 2c 2d 35 30 | 2c 32 35 30 2c 30 2c 31 |,200,-50|,250,0,1|
|00000a50| 31 35 2c 38 36 30 2c 22 | 31 22 2c 33 35 30 2c 30 |15,860,"|1",350,0|
|00000a60| 2c 22 32 22 2c 35 31 35 | 2c 30 2c 22 33 22 2c 37 |,"2",515|,0,"3",7|
|00000a70| 37 30 2c 30 2c 22 34 22 | 2c 39 37 30 2c 30 2c 22 |70,0,"4"|,970,0,"|
|00000a80| 35 22 2c 31 31 37 30 2c | 30 2c 22 36 22 2c 31 31 |5",1170,|0,"6",11|
|00000a90| 35 2c 2d 32 31 30 2c 22 | 37 22 2c 33 32 30 2c 30 |5,-210,"|7",320,0|
|00000aa0| 2c 22 38 22 2c 35 31 35 | 2c 30 2c 22 39 22 2c 37 |,"8",515|,0,"9",7|
|00000ab0| 32 32 2c 30 2c 22 30 22 | 2c 39 37 30 2c 30 2c 22 |22,0,"0"|,970,0,"|
|00000ac0| 2d 22 2c 31 31 35 30 2c | 30 2c 22 3d 22 0d 01 f4 |-",1150,|0,"="...|
|00000ad0| 10 20 dd f2 53 61 76 65 | 47 72 69 64 3a 0d 01 fe |. ..Save|Grid:...|
|00000ae0| 4b 20 3a 43 31 3d 31 30 | 30 3a 43 32 3d 32 30 30 |K :C1=10|0:C2=200|
|00000af0| 3a 43 33 3d 35 30 3a f2 | 50 72 69 6e 74 28 22 53 |:C3=50:.|Print("S|
|00000b00| 61 76 65 20 67 72 69 64 | 20 3f 20 59 2f 4e 22 2c |ave grid| ? Y/N",|
|00000b10| 34 34 30 2c 39 30 30 29 | 3a 41 3d a5 3a f2 42 6c |440,900)|:A=.:.Bl|
|00000b20| 61 6e 6b 4d 65 6e 75 3a | 0d 02 08 53 20 e7 41 3c |ankMenu:|...S .A<|
|00000b30| 3e 38 39 f2 42 6c 61 6e | 6b 4d 65 6e 75 3a f2 50 |>89.Blan|kMenu:.P|
|00000b40| 72 69 6e 74 28 22 47 72 | 69 64 20 6e 6f 74 20 73 |rint("Gr|id not s|
|00000b50| 61 76 65 64 22 2c 34 35 | 30 2c 39 30 30 29 3a ef |aved",45|0,900):.|
|00000b60| 35 3a e3 4b 3d 30 b8 33 | 30 30 30 30 3a ed 3a f2 |5:.K=0.3|0000:.:.|
|00000b70| 42 6c 61 6e 6b 4d 65 6e | 75 3a e1 0d 02 12 29 20 |BlankMen|u:....) |
|00000b80| f1 3a f2 50 72 69 6e 74 | 28 22 53 61 76 69 6e 67 |.:.Print|("Saving|
|00000b90| 20 47 72 69 64 22 2c 34 | 38 35 2c 39 30 30 29 3a | Grid",4|85,900):|
|00000ba0| 42 3d 30 3a 0d 02 1c 40 | 20 e7 54 25 3d 31 32 20 |B=0:...@| .T%=12 |
|00000bb0| 4a 25 3d ad 22 47 52 49 | 44 53 22 3a f5 42 3d 42 |J%=."GRI|DS":.B=B|
|00000bc0| 2b 31 3a e8 23 4a 25 2c | 5a 24 28 42 29 2c 54 25 |+1:.#J%,|Z$(B),T%|
|00000bd0| 28 42 29 3a fd 5a 24 28 | 42 29 3d 22 45 4e 44 22 |(B):.Z$(|B)="END"|
|00000be0| 3a d9 23 30 0d 02 26 25 | 20 e7 54 25 3d 31 32 20 |:.#0..&%| .T%=12 |
|00000bf0| 5a 24 28 42 2b 31 29 3d | 22 45 4e 44 22 3a 2a 44 |Z$(B+1)=|"END":*D|
|00000c00| 45 4c 2e 20 47 52 49 44 | 53 0d 02 30 3a 20 e7 54 |EL. GRID|S..0: .T|
|00000c10| 25 3d 31 32 20 4a 25 3d | ae 22 47 52 49 44 53 22 |%=12 J%=|."GRIDS"|
|00000c20| 8b 42 3d 31 3a 4a 25 3d | ae 22 42 49 54 53 22 3a |.B=1:J%=|."BITS":|
|00000c30| 5a 24 28 32 29 3d 22 45 | 4e 44 22 3a 54 25 28 32 |Z$(2)="E|ND":T%(2|
|00000c40| 29 3d 30 0d 02 3a 42 20 | 5a 24 28 42 29 3d 5a 24 |)=0..:B |Z$(B)=Z$|
|00000c50| 3a 54 25 28 42 29 3d 54 | 25 3a e3 4e 3d 31 b8 42 |:T%(B)=T|%:.N=1.B|
|00000c60| 2b 31 3a f1 23 4a 25 2c | 5a 24 28 4e 29 2c 54 25 |+1:.#J%,|Z$(N),T%|
|00000c70| 28 4e 29 3a ed 3a d9 23 | 30 3a f2 42 6c 61 6e 6b |(N):.:.#|0:.Blank|
|00000c80| 4d 65 6e 75 3a 0d 02 44 | 63 20 e7 20 54 25 3d 31 |Menu:..D|c . T%=1|
|00000c90| 32 3a 54 24 3d 22 47 72 | 69 64 20 22 2b c3 42 2b |2:T$="Gr|id "+.B+|
|00000ca0| 22 20 53 61 76 65 64 22 | 3a f2 50 72 69 6e 74 28 |" Saved"|:.Print(|
|00000cb0| 54 24 2c 34 34 30 2c 39 | 30 30 29 3a 8b 20 54 24 |T$,440,9|00):. T$|
|00000cc0| 3d 22 50 61 72 74 69 61 | 6c 20 47 72 69 64 20 53 |="Partia|l Grid S|
|00000cd0| 61 76 65 64 22 3a f2 50 | 72 69 6e 74 28 54 24 2c |aved":.P|rint(T$,|
|00000ce0| 34 30 30 2c 39 30 30 29 | 0d 02 4e 26 20 3a e3 4b |400,900)|..N& :.K|
|00000cf0| 3d 30 b8 34 30 30 30 30 | 3a ed 3a f2 42 6c 61 6e |=0.40000|:.:.Blan|
|00000d00| 6b 4d 65 6e 75 3a f4 20 | 2a 4e 4f 44 49 52 0d 02 |kMenu:. |*NODIR..|
|00000d10| 58 06 20 e1 0d 02 62 86 | 20 dd f2 47 72 69 64 46 |X. ...b.| ..GridF|
|00000d20| 69 6c 65 4d 65 6e 75 3a | 4a 25 3d ad 22 47 52 49 |ileMenu:|J%=."GRI|
|00000d30| 44 53 22 3a f5 42 3d 42 | 2b 31 3a e8 23 4a 25 2c |DS":.B=B|+1:.#J%,|
|00000d40| 5a 24 2c 54 25 3a fd 5a | 24 3d 22 45 4e 44 22 3a |Z$,T%:.Z|$="END":|
|00000d50| 54 24 3d 22 54 68 65 72 | 65 20 61 72 65 20 22 2b |T$="Ther|e are "+|
|00000d60| c3 28 42 2d 31 29 2b 22 | 20 73 61 76 65 64 20 66 |.(B-1)+"| saved f|
|00000d70| 69 6c 65 73 20 66 6f 72 | 20 74 68 69 73 20 67 72 |iles for| this gr|
|00000d80| 69 64 22 3a 42 3d 30 3a | f2 50 72 69 6e 74 28 54 |id":B=0:|.Print(T|
|00000d90| 24 2c 31 30 30 2c 39 35 | 30 29 0d 02 6c 34 20 d9 |$,100,95|0)..l4 .|
|00000da0| 23 30 3a f2 50 72 69 6e | 74 28 22 20 45 6e 74 65 |#0:.Prin|t(" Ente|
|00000db0| 72 20 61 20 73 6f 6c 75 | 74 69 6f 6e 20 6e 75 6d |r a solu|tion num|
|00000dc0| 62 65 72 22 2c 32 38 30 | 2c 38 37 30 29 3a 0d 02 |ber",280|,870):..|
|00000dd0| 76 50 20 f2 50 72 69 6e | 74 28 22 20 6f 72 20 61 |vP .Prin|t(" or a|
|00000de0| 20 27 52 45 54 55 52 4e | 27 22 2c 32 38 30 2c 37 | 'RETURN|'",280,7|
|00000df0| 39 30 29 3a f2 50 72 69 | 6e 74 28 22 20 66 6f 72 |90):.Pri|nt(" for|
|00000e00| 20 61 6e 20 75 6e 66 69 | 6e 69 73 68 65 64 20 67 | an unfi|nished g|
|00000e10| 72 69 64 22 2c 32 38 30 | 2c 37 31 30 29 3a 0d 02 |rid",280|,710):..|
|00000e20| 80 1d 20 f2 49 4e 28 31 | 30 30 30 2c 37 31 30 29 |.. .IN(1|000,710)|
|00000e30| 3a 42 24 3d c0 42 24 2c | 34 29 3a 0d 02 8a 38 20 |:B$=.B$,|4):...8 |
|00000e40| 54 3d bb 42 24 3a f4 20 | 50 52 4f 43 42 6c 61 6e |T=.B$:. |PROCBlan|
|00000e50| 6b 4d 65 6e 75 3a 54 24 | 3d 22 4c 6f 61 64 20 47 |kMenu:T$|="Load G|
|00000e60| 72 69 64 20 22 2b 53 54 | 52 24 54 2b 22 3f 20 59 |rid "+ST|R$T+"? Y|
|00000e70| 2f 4e 22 0d 02 94 4b 20 | f4 20 43 31 3d 31 30 30 |/N"...K |. C1=100|
|00000e80| 3a 43 32 3d 32 35 35 3a | 43 33 3d 32 30 30 3a 50 |:C2=255:|C3=200:P|
|00000e90| 52 4f 43 50 72 69 6e 74 | 28 54 24 2c 34 34 30 2c |ROCPrint|(T$,440,|
|00000ea0| 39 30 30 29 3a 41 3d 47 | 45 54 3a 50 52 49 4e 54 |900):A=G|ET:PRINT|
|00000eb0| 3a 49 46 41 3d 37 38 45 | 4e 44 50 52 4f 43 0d 02 |:IFA=78E|NDPROC..|
|00000ec0| 9e 6a 20 e7 9f 3d 31 32 | 39 3a 43 31 3d 32 35 35 |.j ..=12|9:C1=255|
|00000ed0| 3a 43 32 3d 35 30 3a 43 | 33 3d 30 3a f2 50 72 69 |:C2=50:C|3=0:.Pri|
|00000ee0| 6e 74 28 22 4e 6f 20 67 | 72 69 64 20 66 69 6c 65 |nt("No g|rid file|
|00000ef0| 73 20 66 6f 75 6e 64 22 | 2c 33 35 30 2c 39 30 30 |s found"|,350,900|
|00000f00| 29 3a d9 23 30 3a 41 3d | 30 3a 4e 25 3d 30 3a e3 |):.#0:A=|0:N%=0:.|
|00000f10| 5f 3d 30 b8 36 30 30 30 | 30 3a ed 3a f2 42 6c 61 |_=0.6000|0:.:.Bla|
|00000f20| 6e 6b 4d 65 6e 75 3a e1 | 0d 02 a8 1a 20 43 31 3d |nkMenu:.|.... C1=|
|00000f30| 31 30 30 3a 43 32 3d 31 | 32 30 3a 43 33 3d 31 34 |100:C2=1|20:C3=14|
|00000f40| 30 3a 0d 02 b2 24 20 e7 | 54 3d 30 4a 25 3d ad 22 |0:...$ .|T=0J%=."|
|00000f50| 42 49 54 53 22 3a 42 3d | 2d 31 8b 4a 25 3d ad 22 |BITS":B=|-1.J%=."|
|00000f60| 47 52 49 44 53 22 0d 02 | bc 10 20 f2 42 6c 61 6e |GRIDS"..|.. .Blan|
|00000f70| 6b 4d 65 6e 75 3a 0d 02 | c6 17 20 f5 42 3d 42 2b |kMenu:..|.. .B=B+|
|00000f80| 31 3a e8 23 4a 25 2c 5a | 24 2c 54 25 3a 0d 02 d0 |1:.#J%,Z|$,T%:...|
|00000f90| 4b 20 f4 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |K .     |        |
|00000fa0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000fb0| 56 44 55 34 3a 50 52 49 | 4e 54 54 41 42 28 30 2c |VDU4:PRI|NTTAB(0,|
|00000fc0| 30 29 42 2c 4a 25 2c 22 | 20 22 2c 5a 24 3a 41 3d |0)B,J%,"| ",Z$:A=|
|00000fd0| 47 45 54 3a 56 44 55 35 | 0d 02 da 1b 20 fd 42 3d |GET:VDU5|.... .B=|
|00000fe0| 54 20 84 5a 24 3d 22 45 | 4e 44 22 3a d9 23 30 3a |T .Z$="E|ND":.#0:|
|00000ff0| 42 3d 30 0d 02 e4 05 20 | 0d 02 ee 75 20 e7 54 25 |B=0.... |...u .T%|
|00001000| 3d 30 f2 42 6c 61 6e 6b | 4d 65 6e 75 3a 43 31 3d |=0.Blank|Menu:C1=|
|00001010| 32 35 35 3a 43 32 3d 30 | 3a 43 33 3d 30 3a 54 24 |255:C2=0|:C3=0:T$|
|00001020| 3d 22 47 72 69 64 20 6e | 75 6d 62 65 72 20 22 2b |="Grid n|umber "+|
|00001030| c3 54 2b 22 20 6e 6f 74 | 20 66 6f 75 6e 64 22 3a |.T+" not| found":|
|00001040| 3a f2 50 72 69 6e 74 28 | 54 24 2c 33 35 30 2c 39 |:.Print(|T$,350,9|
|00001050| 30 30 29 3a e3 4b 3d 30 | b8 34 30 30 30 30 3a ed |00):.K=0|.40000:.|
|00001060| 3a f2 42 6c 61 6e 6b 4d | 65 6e 75 3a e1 0d 02 f8 |:.BlankM|enu:....|
|00001070| 07 20 db 3a 0d 03 02 1e | 20 f2 46 49 4c 4c 47 52 |. .:....| .FILLGR|
|00001080| 49 44 3a f2 47 72 69 64 | 3a f2 53 65 61 72 63 68 |ID:.Grid|:.Search|
|00001090| 3a e1 0d 03 0c 0e 20 dd | f2 53 65 61 72 63 68 3a |:..... .|.Search:|
|000010a0| 0d 03 16 0b 20 f2 43 48 | 45 53 53 0d 03 20 1e 20 |.... .CH|ESS.. . |
|000010b0| 44 24 3d 5a 24 3a e3 4e | 25 3d 31 b8 31 32 3a 55 |D$=Z$:.N|%=1.12:U|
|000010c0| 28 4e 25 29 3d 30 3a ed | 3a 0d 03 2a 63 20 e3 68 |(N%)=0:.|:..*c .h|
|000010d0| 25 3d 31 b8 54 25 3a 50 | 25 3d 31 3a 60 25 3d a7 |%=1.T%:P|%=1:`%=.|
|000010e0| 5a 24 2c 22 3a 22 2c 50 | 25 2b 31 29 3a 4c 25 3d |Z$,":",P|%+1):L%=|
|000010f0| 60 25 2d 50 25 3a 6b 25 | 3d 4c 25 3a 63 25 3d 50 |`%-P%:k%|=L%:c%=P|
|00001100| 25 3a 50 24 3d c1 5a 24 | 2c 63 25 2c 4c 25 29 3a |%:P$=.Z$|,c%,L%):|
|00001110| 41 24 3d 50 24 3a 51 25 | 3d 31 3a 5f 25 3d a7 41 |A$=P$:Q%|=1:_%=.A|
|00001120| 24 2c 22 2c 22 2c 51 25 | 2b 31 29 3a 0d 03 34 7a |$,",",Q%|+1):..4z|
|00001130| 20 e3 64 25 3d 31 b8 35 | 3a 4c 25 3d 5f 25 2d 51 | .d%=1.5|:L%=_%-Q|
|00001140| 25 3a 65 25 3d 51 25 3a | 51 24 3d c1 41 24 2c 65 |%:e%=Q%:|Q$=.A$,e|
|00001150| 25 2b 31 2c 4c 25 2d 31 | 29 3a 41 25 28 64 25 29 |%+1,L%-1|):A%(d%)|
|00001160| 3d bb 51 24 3a 51 25 3d | 5f 25 3a 5f 25 3d a7 41 |=.Q$:Q%=|_%:_%=.A|
|00001170| 24 2c 22 2c 22 2c 51 25 | 2b 31 29 3a 4e 25 3d 41 |$,",",Q%|+1):N%=A|
|00001180| 25 28 31 29 3a 58 3d 41 | 25 28 32 29 3a 59 3d 41 |%(1):X=A|%(2):Y=A|
|00001190| 25 28 33 29 3a 46 25 3d | 41 25 28 34 29 3a 55 25 |%(3):F%=|A%(4):U%|
|000011a0| 3d 41 25 28 35 29 0d 03 | 3e 14 20 e7 46 25 3d 30 |=A%(5)..|>. .F%=0|
|000011b0| 44 25 3d 2d 31 8b 44 25 | 3d 30 0d 03 48 26 20 55 |D%=-1.D%|=0..H& U|
|000011c0| 28 4e 25 29 3d 4e 25 3a | ed 3a 65 3d 30 3a ec 58 |(N%)=N%:|.:e=0:.X|
|000011d0| 2c 59 3a f2 52 3a 4c 3d | 38 31 3a e6 30 2c 31 3a |,Y:.R:L=|81:.0,1:|
|000011e0| 0d 03 52 54 20 f2 46 69 | 6c 6c 50 69 65 63 65 73 |..RT .Fi|llPieces|
|000011f0| 28 31 29 3a 4c 3d 31 3a | ef 31 38 2c 30 2c 4a 3a |(1):L=1:|.18,0,J:|
|00001200| f2 44 72 61 77 3a 57 25 | 3d 49 25 3a 55 28 4e 25 |.Draw:W%|=I%:U(N%|
|00001210| 29 3d 4e 25 3a 5a 24 3d | c2 5a 24 2c 28 a9 5a 24 |)=N%:Z$=|.Z$,(.Z$|
|00001220| 2d 6b 25 29 29 3a ed 3a | 5a 24 3d 44 24 3a 4e 25 |-k%)):.:|Z$=D$:N%|
|00001230| 3d 30 3a e1 0d 03 5c 18 | 20 dd f2 53 65 74 47 72 |=0:...\.| ..SetGr|
|00001240| 69 64 44 69 72 65 63 74 | 6f 72 79 3a 0d 03 66 0d |idDirect|ory:..f.|
|00001250| 20 f4 20 2a 4e 4f 44 49 | 52 0d 03 70 10 20 f2 42 | . *NODI|R..p. .B|
|00001260| 6c 61 6e 6b 4d 65 6e 75 | 3a 0d 03 7a 22 20 e7 56 |lankMenu|:..z" .V|
|00001270| 25 3d 31 20 8c 20 2a 44 | 49 52 20 3c 50 6f 6c 79 |%=1 . *D|IR <Poly|
|00001280| 24 44 69 72 3e 2e 47 52 | 49 44 31 0d 03 84 22 20 |$Dir>.GR|ID1..." |
|00001290| e7 56 25 3d 32 20 8c 20 | 2a 44 49 52 20 3c 50 6f |.V%=2 . |*DIR <Po|
|000012a0| 6c 79 24 44 69 72 3e 2e | 47 52 49 44 32 0d 03 8e |ly$Dir>.|GRID2...|
|000012b0| 22 20 e7 56 25 3d 33 20 | 8c 20 2a 44 49 52 20 3c |" .V%=3 |. *DIR <|
|000012c0| 50 6f 6c 79 24 44 69 72 | 3e 2e 47 52 49 44 33 0d |Poly$Dir|>.GRID3.|
|000012d0| 03 98 22 20 e7 56 25 3d | 34 20 8c 20 2a 44 49 52 |.." .V%=|4 . *DIR|
|000012e0| 20 3c 50 6f 6c 79 24 44 | 69 72 3e 2e 47 52 49 44 | <Poly$D|ir>.GRID|
|000012f0| 34 0d 03 a2 22 20 e7 56 | 25 3d 35 20 8c 20 2a 44 |4..." .V|%=5 . *D|
|00001300| 49 52 20 3c 50 6f 6c 79 | 24 44 69 72 3e 2e 47 52 |IR <Poly|$Dir>.GR|
|00001310| 49 44 35 0d 03 ac 22 20 | e7 56 25 3d 36 20 8c 20 |ID5..." |.V%=6 . |
|00001320| 2a 44 49 52 20 3c 50 6f | 6c 79 24 44 69 72 3e 2e |*DIR <Po|ly$Dir>.|
|00001330| 47 52 49 44 36 0d 03 b6 | 22 20 e7 56 25 3d 37 20 |GRID6...|" .V%=7 |
|00001340| 8c 20 2a 44 49 52 20 3c | 50 6f 6c 79 24 44 69 72 |. *DIR <|Poly$Dir|
|00001350| 3e 2e 47 52 49 44 37 0d | 03 c0 22 20 e7 56 25 3d |>.GRID7.|.." .V%=|
|00001360| 38 20 8c 20 2a 44 49 52 | 20 3c 50 6f 6c 79 24 44 |8 . *DIR| <Poly$D|
|00001370| 69 72 3e 2e 47 52 49 44 | 38 0d 03 ca 22 20 e7 56 |ir>.GRID|8..." .V|
|00001380| 25 3d 39 20 8c 20 2a 44 | 49 52 20 3c 50 6f 6c 79 |%=9 . *D|IR <Poly|
|00001390| 24 44 69 72 3e 2e 47 52 | 49 44 39 0d 03 d4 22 20 |$Dir>.GR|ID9..." |
|000013a0| e7 56 25 3d 30 20 8c 20 | 2a 44 49 52 20 3c 50 6f |.V%=0 . |*DIR <Po|
|000013b0| 6c 79 24 44 69 72 3e 2e | 47 52 49 44 30 0d 03 de |ly$Dir>.|GRID0...|
|000013c0| 0c 20 2a 46 58 32 31 2c | 30 0d 03 e8 21 20 e7 4e |. *FX21,|0...! .N|
|000013d0| 25 3d 31 37 f2 47 72 69 | 64 46 69 6c 65 4d 65 6e |%=17.Gri|dFileMen|
|000013e0| 75 3a f4 20 2a 4e 4f 44 | 49 52 0d 03 f2 14 20 e7 |u:. *NOD|IR.... .|
|000013f0| 4e 25 3d 31 36 f2 53 61 | 76 65 47 72 69 64 0d 03 |N%=16.Sa|veGrid..|
|00001400| fc 2b 20 e7 20 4e 25 3d | 31 38 20 80 20 56 25 3d |.+ . N%=|18 . V%=|
|00001410| 34 20 8c 20 2a 4b 45 59 | 30 20 31 44 44 44 44 44 |4 . *KEY|0 1DDDDD|
|00001420| 54 54 54 54 54 54 54 7c | 4d 0d 04 06 23 20 43 25 |TTTTTTT||M...# C%|
|00001430| 3d 37 30 3a f2 42 6c 61 | 6e 6b 4d 65 6e 75 3a f2 |=70:.Bla|nkMenu:.|
|00001440| 53 65 74 46 6c 69 70 4d | 65 6e 75 3a 0d 04 10 06 |SetFlipM|enu:....|
|00001450| 20 e1 0d 04 1a 17 20 dd | f2 50 69 63 6b 3a e7 54 | ..... .|.Pick:.T|
|00001460| 25 3d 31 32 20 61 25 3d | 31 0d 04 24 21 20 55 25 |%=12 a%=|1..$! U%|
|00001470| 3d 30 3a f2 52 3a 43 31 | 3d 35 30 3a 43 32 3d 32 |=0:.R:C1|=50:C2=2|
|00001480| 35 30 3a 43 33 3d 31 35 | 30 3a 0d 04 2e 68 20 e7 |50:C3=15|0:...h .|
|00001490| 56 25 3d 31 3a f2 50 72 | 69 6e 74 28 22 50 69 63 |V%=1:.Pr|int("Pic|
|000014a0| 6b 22 2c 38 30 2c 34 39 | 35 29 3a f2 50 72 69 6e |k",80,49|5):.Prin|
|000014b0| 74 28 22 61 22 2c 31 32 | 30 2c 34 35 30 29 3a f2 |t("a",12|0,450):.|
|000014c0| 50 72 69 6e 74 28 22 50 | 65 6e 74 22 2c 38 30 2c |Print("P|ent",80,|
|000014d0| 34 30 30 29 8b f2 50 72 | 69 6e 74 28 22 50 69 63 |400)..Pr|int("Pic|
|000014e0| 6b 20 61 20 50 65 6e 74 | 22 2c 35 30 30 2c 35 31 |k a Pent|",500,51|
|000014f0| 35 29 0d 04 38 0d 20 4e | 25 3d a5 2d 34 38 3a 0d |5)..8. N|%=.-48:.|
|00001500| 04 42 9d 20 e7 4e 25 3d | 31 33 4e 25 3d 31 32 8b |.B. .N%=|13N%=12.|
|00001510| e7 4e 25 3d 31 37 4e 25 | 3d 31 35 3a 61 25 3d 30 |.N%=17N%|=15:a%=0|
|00001520| 8b e7 4e 25 3d 2d 33 4e | 25 3d 31 31 8b e7 4e 25 |..N%=-3N|%=11..N%|
|00001530| 3d 30 4e 25 3d 31 30 8b | e7 4e 25 3d 2d 33 39 84 |=0N%=10.|.N%=-39.|
|00001540| 4e 25 3d 32 32 4e 25 3d | 31 33 8b e7 4e 25 3d 37 |N%=22N%=|13..N%=7|
|00001550| 39 3a 4e 25 3d 31 34 3a | 8b e7 4e 25 3d 2d 32 39 |9:N%=14:|..N%=-29|
|00001560| 4e 25 3d 31 36 8b e7 4e | 25 3d 2d 33 36 20 4e 25 |N%=16..N|%=-36 N%|
|00001570| 3d 31 37 20 8b 20 e7 20 | 4e 25 3d 2d 34 30 20 4e |=17 . . |N%=-40 N|
|00001580| 25 3d 31 38 20 8b 20 e7 | 20 4e 25 3c 30 20 84 20 |%=18 . .| N%<0 . |
|00001590| 4e 25 3e 31 38 20 e5 20 | 8d 54 78 44 0d 04 4c 1b |N%>18 . |.TxD..L.|
|000015a0| 20 e7 28 4e 25 3e 30 80 | 20 4e 25 3c 31 39 29 20 | .(N%>0.| N%<19) |
|000015b0| e1 20 8b 8d 54 78 44 0d | 04 56 12 20 dd f2 43 68 |. ..TxD.|.V. ..Ch|
|000015c0| 65 63 6b 50 65 69 63 65 | 73 0d 04 60 09 20 65 3d |eckPeice|s..`. e=|
|000015d0| 31 3a 0d 04 6a 8b 20 e7 | 43 25 3d 31 33 20 4c 3d |1:..j. .|C%=13 L=|
|000015e0| 38 31 3a f2 46 69 6c 6c | 50 69 65 63 65 73 28 30 |81:.Fill|Pieces(0|
|000015f0| 29 3a f2 46 69 78 50 65 | 69 63 65 73 3a e7 4f 75 |):.FixPe|ices:.Ou|
|00001600| 74 4f 66 47 72 69 64 25 | 3d 30 80 4f 6e 54 6f 70 |tOfGrid%|=0.OnTop|
|00001610| 25 3d 30 54 25 3d 54 25 | 2b 31 3a 47 3d 30 3a 48 |%=0T%=T%|+1:G=0:H|
|00001620| 3d 31 3a 4c 3d 38 31 3a | e6 30 2c 4f 3a f2 46 69 |=1:L=81:|.0,O:.Fi|
|00001630| 6c 6c 50 69 65 63 65 73 | 28 31 29 3a 55 28 4e 25 |llPieces|(1):U(N%|
|00001640| 29 3d 4e 25 3a f2 53 65 | 74 46 6c 69 70 4d 65 6e |)=N%:.Se|tFlipMen|
|00001650| 75 3a 8b e6 33 2c 49 3a | f2 44 72 61 77 0d 04 74 |u:..3,I:|.Draw..t|
|00001660| 8a 20 e7 20 43 25 3d 31 | 33 35 20 84 20 43 25 3d |. . C%=1|35 . C%=|
|00001670| 38 34 20 8c 20 55 25 3d | 55 25 2b 31 3a f2 4a 20 |84 . U%=|U%+1:.J |
|00001680| 8b 20 e7 20 43 25 3d 31 | 33 36 20 84 20 43 25 3d |. . C%=1|36 . C%=|
|00001690| 37 36 20 58 3d 58 2d 57 | 25 20 8b 20 e7 20 43 25 |76 X=X-W|% . . C%|
|000016a0| 3d 31 33 37 20 84 20 43 | 25 3d 38 32 20 58 3d 58 |=137 . C|%=82 X=X|
|000016b0| 2b 57 25 20 8b 20 e7 20 | 43 25 3d 31 33 39 20 84 |+W% . . |C%=139 .|
|000016c0| 20 43 25 3d 38 35 20 59 | 3d 59 2b 57 25 20 8b 20 | C%=85 Y|=Y+W% . |
|000016d0| e7 20 43 25 3d 31 33 38 | 20 84 20 43 25 3d 36 38 |. C%=138| . C%=68|
|000016e0| 20 59 3d 59 2d 57 25 0d | 04 7e 0c 20 f2 44 72 61 | Y=Y-W%.|.~. .Dra|
|000016f0| 77 3a e1 0d 04 88 11 20 | dd f2 46 69 78 50 65 69 |w:..... |..FixPei|
|00001700| 63 65 73 3a 0d 04 92 9c | 20 e7 56 25 3c 3e 31 e5 |ces:....| .V%<>1.|
|00001710| 8d 74 5c 44 8b e7 4f 75 | 74 4f 66 47 72 69 64 25 |.t\D..Ou|tOfGrid%|
|00001720| 3d 31 3a 43 31 3d 32 30 | 30 3a 43 32 3d 35 30 3a |=1:C1=20|0:C2=50:|
|00001730| 43 33 3d 35 30 3a f2 50 | 72 69 6e 74 28 22 4f 75 |C3=50:.P|rint("Ou|
|00001740| 74 22 2c 38 30 2c 33 30 | 30 29 3a f2 50 72 69 6e |t",80,30|0):.Prin|
|00001750| 74 28 22 6f 66 22 2c 31 | 34 30 2c 32 35 30 29 3a |t("of",1|40,250):|
|00001760| f2 50 72 69 6e 74 28 22 | 74 68 65 22 2c 38 30 2c |.Print("|the",80,|
|00001770| 32 30 30 29 3a f2 50 72 | 69 6e 74 28 22 47 72 69 |200):.Pr|int("Gri|
|00001780| 64 22 2c 35 30 2c 31 35 | 30 29 3a e3 4b 3d 30 b8 |d",50,15|0):.K=0.|
|00001790| 32 30 30 30 30 3a ed 3a | f2 42 4c 41 4e 4b 3a e1 |20000:.:|.BLANK:.|
|000017a0| 0d 04 9c 64 20 e7 4f 75 | 74 4f 66 47 72 69 64 25 |...d .Ou|tOfGrid%|
|000017b0| 3d 31 3a 43 31 3d 32 35 | 35 3a 43 32 3d 35 30 3a |=1:C1=25|5:C2=50:|
|000017c0| 43 33 3d 38 30 3a f2 42 | 4c 41 4e 4b 3a f2 50 72 |C3=80:.B|LANK:.Pr|
|000017d0| 69 6e 74 28 22 4f 75 74 | 20 6f 66 20 74 68 65 20 |int("Out| of the |
|000017e0| 47 72 69 64 22 2c 34 35 | 30 2c 35 31 35 29 3a e3 |Grid",45|0,515):.|
|000017f0| 4b 3d 30 b8 32 30 30 30 | 30 3a ed 3a f2 42 4c 41 |K=0.2000|0:.:.BLA|
|00001800| 4e 4b 3a e1 0d 04 a6 68 | 20 e7 4f 6e 54 6f 70 25 |NK:....h| .OnTop%|
|00001810| 3d 31 80 56 25 3d 31 20 | f2 50 72 69 6e 74 28 22 |=1.V%=1 |.Print("|
|00001820| 4e 6f 74 22 2c 38 30 2c | 35 30 30 29 3a f2 50 72 |Not",80,|500):.Pr|
|00001830| 69 6e 74 28 22 6f 6e 22 | 2c 31 31 30 2c 34 35 30 |int("on"|,110,450|
|00001840| 29 3a f2 50 72 69 6e 74 | 28 22 54 6f 70 22 2c 38 |):.Print|("Top",8|
|00001850| 30 2c 34 30 30 29 3a e3 | 4b 3d 30 b8 32 30 30 30 |0,400):.|K=0.2000|
|00001860| 30 3a ed 3a f2 42 4c 41 | 4e 4b 3a e1 0d 04 b0 56 |0:.:.BLA|NK:....V|
|00001870| 20 e7 4f 6e 54 6f 70 25 | 3d 31 3a 43 31 3d 32 35 | .OnTop%|=1:C1=25|
|00001880| 30 3a 43 32 3d 32 30 30 | 3a 43 33 3d 35 35 3a f2 |0:C2=200|:C3=55:.|
|00001890| 50 72 69 6e 74 28 22 4e | 6f 74 20 6f 6e 20 54 6f |Print("N|ot on To|
|000018a0| 70 21 22 2c 35 30 30 2c | 35 33 30 29 3a e3 4b 3d |p!",500,|530):.K=|
|000018b0| 30 b8 32 30 30 30 30 3a | ed 3a f2 42 4c 41 4e 4b |0.20000:|.:.BLANK|
|000018c0| 3a e1 0d 04 ba 0b 20 e6 | 30 2c 46 25 3a 0d 04 c4 |:..... .|0,F%:...|
|000018d0| 0b 20 f2 44 72 61 77 3a | 0d 04 ce 3b 20 5a 24 3d |. .Draw:|...; Z$=|
|000018e0| 5a 24 2b 22 3a 22 2b c3 | 28 4e 25 29 2b 22 2c 22 |Z$+":"+.|(N%)+","|
|000018f0| 2b c3 28 58 29 2b 22 2c | 22 2b c3 28 59 29 2b 22 |+.(X)+",|"+.(Y)+"|
|00001900| 2c 22 2b c3 28 46 25 29 | 2b 22 2c 22 2b c3 28 55 |,"+.(F%)|+","+.(U|
|00001910| 25 29 3a 0d 04 d8 06 20 | e1 0d 04 e2 0e 20 dd f2 |%):.... |..... ..|
|00001920| 44 65 6c 65 74 65 3a 0d | 04 ec 33 20 e7 20 54 25 |Delete:.|..3 . T%|
|00001930| 3d 30 20 e1 3a 8b 20 6c | 25 3d 46 25 3a 4c 24 3d |=0 .:. l|%=F%:L$=|
|00001940| 22 22 3a 4b 25 3d 31 3a | 4c 25 3d 30 3a 6d 25 3d |"":K%=1:|L%=0:m%=|
|00001950| 44 25 3a 2a 46 58 32 31 | 2c 30 0d 04 f6 2a 20 e7 |D%:*FX21|,0...* .|
|00001960| 56 25 3c 3e 31 20 f2 50 | 72 69 6e 74 28 22 44 65 |V%<>1 .P|rint("De|
|00001970| 6c 65 74 65 20 4d 6f 64 | 65 20 2d 22 2c 39 35 2c |lete Mod|e -",95,|
|00001980| 35 31 35 29 0d 05 00 38 | 20 e7 56 25 3d 31 f2 50 |515)...8| .V%=1.P|
|00001990| 72 69 6e 74 28 22 44 65 | 6c 65 74 65 22 2c 35 30 |rint("De|lete",50|
|000019a0| 2c 33 30 30 29 3a f2 50 | 72 69 6e 74 28 22 4d 6f |,300):.P|rint("Mo|
|000019b0| 64 65 20 22 2c 38 30 2c | 32 34 30 29 0d 05 0a 0b |de ",80,|240)....|
|000019c0| 20 f2 50 69 63 6b 3a 0d | 05 14 a6 20 e7 4e 25 3d | .Pick:.|... .N%=|
|000019d0| 31 34 84 4e 25 3d 31 33 | 84 4e 25 3d 31 35 e5 8d |14.N%=13|.N%=15..|
|000019e0| 74 56 45 8b e7 55 28 4e | 25 29 3c 3e 4e 25 3a e7 |tVE..U(N|%)<>N%:.|
|000019f0| 56 25 3d 31 3a 43 31 3d | 31 35 30 3a 43 32 3d 32 |V%=1:C1=|150:C2=2|
|00001a00| 30 30 3a 43 33 3d 32 35 | 35 3a f2 42 4c 41 4e 4b |00:C3=25|5:.BLANK|
|00001a10| 3a f2 50 72 69 6e 74 28 | 22 4e 6f 74 22 2c 31 30 |:.Print(|"Not",10|
|00001a20| 30 2c 34 33 30 29 3a f2 | 50 72 69 6e 74 28 22 55 |0,430):.|Print("U|
|00001a30| 73 65 64 22 2c 38 30 2c | 33 37 30 29 3a f2 50 72 |sed",80,|370):.Pr|
|00001a40| 69 6e 74 28 22 59 65 74 | 22 2c 31 30 30 2c 33 31 |int("Yet|",100,31|
|00001a50| 30 29 3a e3 5a 25 3d 30 | b8 34 30 30 30 30 3a ed |0):.Z%=0|.40000:.|
|00001a60| 3a f2 42 4c 41 4e 4b 3a | e5 8d 74 56 45 0d 05 1e |:.BLANK:|..tVE...|
|00001a70| 4b 20 e7 55 28 4e 25 29 | 3c 3e 4e 25 3a f2 50 72 |K .U(N%)|<>N%:.Pr|
|00001a80| 69 6e 74 28 22 2d 20 4e | 6f 74 20 55 73 65 64 20 |int("- N|ot Used |
|00001a90| 59 65 74 22 2c 38 35 30 | 2c 35 31 35 29 3a e3 5a |Yet",850|,515):.Z|
|00001aa0| 25 3d 30 b8 34 30 30 30 | 30 3a ed 3a f2 42 4c 41 |%=0.4000|0:.:.BLA|
|00001ab0| 4e 4b 3a e5 8d 74 56 45 | 0d 05 28 61 20 e7 4e 25 |NK:..tVE|..(a .N%|
|00001ac0| 3d 31 34 84 4e 25 3d 31 | 33 84 4e 25 3d 31 35 e5 |=14.N%=1|3.N%=15.|
|00001ad0| 8d 74 56 45 8b e7 55 28 | 4e 25 29 3c 3e 4e 25 3a |.tVE..U(|N%)<>N%:|
|00001ae0| f2 42 4c 41 4e 4b 3a f2 | 50 72 69 6e 74 28 22 4e |.BLANK:.|Print("N|
|00001af0| 6f 74 20 55 73 65 64 20 | 59 65 74 22 2c 34 38 30 |ot Used |Yet",480|
|00001b00| 2c 35 31 35 29 3a e3 5a | 25 3d 30 b8 34 30 30 30 |,515):.Z|%=0.4000|
|00001b10| 30 3a ed 3a e5 8d 74 56 | 45 0d 05 32 1b 20 50 25 |0:.:..tV|E..2. P%|
|00001b20| 3d 31 3a 60 25 3d a7 5a | 24 2c 22 3a 22 2c 50 25 |=1:`%=.Z|$,":",P%|
|00001b30| 2b 31 29 3a 0d 05 3c 94 | 20 e3 68 25 3d 31 b8 54 |+1):..<.| .h%=1.T|
|00001b40| 25 3a 4c 25 3d 60 25 2d | 50 25 3a 63 25 3d 50 25 |%:L%=`%-|P%:c%=P%|
|00001b50| 3a 50 24 3d c1 5a 24 2c | 63 25 2c 4c 25 29 3a 41 |:P$=.Z$,|c%,L%):A|
|00001b60| 24 3d 50 24 3a 51 25 3d | 31 3a 5f 25 3d a7 41 24 |$=P$:Q%=|1:_%=.A$|
|00001b70| 2c 22 2c 22 2c 51 25 2b | 31 29 3a e3 64 25 3d 31 |,",",Q%+|1):.d%=1|
|00001b80| b8 35 3a 4c 25 3d 5f 25 | 2d 51 25 3a 65 25 3d 51 |.5:L%=_%|-Q%:e%=Q|
|00001b90| 25 3a 51 24 3d c1 41 24 | 2c 65 25 2b 31 2c 4c 25 |%:Q$=.A$|,e%+1,L%|
|00001ba0| 2d 31 29 3a 41 25 28 64 | 25 29 3d bb 51 24 3a 51 |-1):A%(d|%)=.Q$:Q|
|00001bb0| 25 3d 5f 25 3a 5f 25 3d | a7 41 24 2c 22 2c 22 2c |%=_%:_%=|.A$,",",|
|00001bc0| 51 25 2b 31 29 3a ed 3a | 0d 05 46 3b 20 6e 25 3d |Q%+1):.:|..F; n%=|
|00001bd0| 41 25 28 31 29 3a e7 6e | 25 3d 4e 25 58 3d 41 25 |A%(1):.n|%=N%X=A%|
|00001be0| 28 32 29 3a 59 3d 41 25 | 28 33 29 3a 46 25 3d 41 |(2):Y=A%|(3):F%=A|
|00001bf0| 25 28 34 29 3a 55 25 3d | 41 25 28 35 29 3a 41 24 |%(4):U%=|A%(5):A$|
|00001c00| 3d 22 22 0d 05 50 1d 20 | 4c 24 3d 4c 24 2b 41 24 |=""..P. |L$=L$+A$|
|00001c10| 3a e7 46 25 3d 30 44 25 | 3d 2d 31 8b 44 25 3d 30 |:.F%=0D%|=-1.D%=0|
|00001c20| 0d 05 5a 1e 20 50 25 3d | 60 25 3a 60 25 3d a7 5a |..Z. P%=|`%:`%=.Z|
|00001c30| 24 2c 22 3a 22 2c 50 25 | 2b 31 29 3a ed 3a 0d 05 |$,":",P%|+1):.:..|
|00001c40| 64 25 20 5a 24 3d 4c 24 | 3a 54 25 3d 54 25 2d 31 |d% Z$=L$|:T%=T%-1|
|00001c50| 3a f2 52 3a 65 3d 30 3a | 4c 3d 38 31 3a e6 30 2c |:.R:e=0:|L=81:.0,|
|00001c60| 31 35 3a 0d 05 6e 0d 20 | 44 65 6c 65 74 65 3d 31 |15:..n. |Delete=1|
|00001c70| 0d 05 78 20 20 f2 46 69 | 6c 6c 50 69 65 63 65 73 |..x  .Fi|llPieces|
|00001c80| 28 31 29 3a 4c 3d 31 3a | ef 31 38 2c 30 2c 4a 3a |(1):L=1:|.18,0,J:|
|00001c90| 0d 05 82 21 20 f2 46 69 | 6c 6c 50 69 65 63 65 73 |...! .Fi|llPieces|
|00001ca0| 28 31 29 3a 57 25 3d 49 | 25 3a 55 28 4e 25 29 3d |(1):W%=I|%:U(N%)=|
|00001cb0| 30 0d 05 8c 0d 20 44 65 | 6c 65 74 65 3d 30 0d 05 |0.... De|lete=0..|
|00001cc0| 96 13 20 f2 42 4c 41 4e | 4b 3a 2a 46 58 32 31 2c |.. .BLAN|K:*FX21,|
|00001cd0| 30 0d 05 a0 17 20 62 25 | 3d 4e 25 3a 46 25 3d 6c |0.... b%|=N%:F%=l|
|00001ce0| 25 3a 44 25 3d 6d 25 3a | 0d 05 aa 12 20 f2 53 65 |%:D%=m%:|.... .Se|
|00001cf0| 74 46 6c 69 70 4d 65 6e | 75 3a 0d 05 b4 17 20 43 |tFlipMen|u:.... C|
|00001d00| 25 3d 31 33 3a 62 25 3d | 2d 31 3a 4b 25 3d 30 3a |%=13:b%=|-1:K%=0:|
|00001d10| e1 0d 05 be 0f 20 dd f2 | 4e 65 77 47 61 6d 65 3a |..... ..|NewGame:|
|00001d20| 0d 05 c8 16 20 f2 42 6c | 61 6e 6b 4d 65 6e 75 3a |.... .Bl|ankMenu:|
|00001d30| 4e 25 3d 31 36 3a 0d 05 | d2 2b 20 f2 53 65 74 47 |N%=16:..|.+ .SetG|
|00001d40| 72 69 64 44 69 72 65 63 | 74 6f 72 79 3a 43 31 3d |ridDirec|tory:C1=|
|00001d50| 32 35 35 3a 43 32 3d 32 | 35 35 3a 43 33 3d 35 30 |255:C2=2|55:C3=50|
|00001d60| 3a 0d 05 dc 2f 20 f2 50 | 72 69 6e 74 28 22 4e 65 |:.../ .P|rint("Ne|
|00001d70| 77 20 67 61 6d 65 20 20 | 20 3f 20 59 20 6f 72 20 |w game  | ? Y or |
|00001d80| 4e 22 2c 34 30 30 2c 37 | 30 30 29 3a 41 3d a5 3a |N",400,7|00):A=.:|
|00001d90| 0d 05 e6 5f 20 e7 41 3d | 37 38 db 3a f5 3a e3 43 |..._ .A=|78.:.:.C|
|00001da0| 31 3d 31 b8 20 32 35 35 | 3a e3 43 32 3d 31 b8 20 |1=1. 255|:.C2=1. |
|00001db0| 32 35 35 3a e3 43 33 3d | 31 b8 20 32 35 35 20 88 |255:.C3=|1. 255 .|
|00001dc0| 20 31 30 20 3a f2 50 72 | 69 6e 74 28 22 50 52 45 | 10 :.Pr|int("PRE|
|00001dd0| 53 53 20 20 42 52 45 41 | 4b 22 2c 34 30 30 2c 43 |SS  BREA|K",400,C|
|00001de0| 33 2a 31 30 30 29 3a f1 | 3a ed 2c 2c 3a fd 30 0d |3*100):.|:.,,:.0.|
|00001df0| 05 f0 06 20 e1 0d 05 fa | 10 20 dd f2 47 72 69 64 |... ....|. ..Grid|
|00001e00| 4d 65 6e 75 3a 0d 06 04 | 0a 20 56 25 3d 31 3a 0d |Menu:...|. V%=1:.|
|00001e10| 06 0e 1c 20 f2 53 65 74 | 75 70 3a 57 25 3d 33 30 |... .Set|up:W%=30|
|00001e20| 3a 43 3d 32 3a 44 3d 34 | 30 30 3a 0d 06 18 1a 20 |:C=2:D=4|00:.... |
|00001e30| f2 46 49 4c 4c 47 52 49 | 44 3a f2 47 72 69 64 3a |.FILLGRI|D:.Grid:|
|00001e40| 56 25 3d 32 3a 0d 06 22 | 1e 20 f2 53 65 74 75 70 |V%=2:.."|. .Setup|
|00001e50| 3a 57 25 3d 33 30 3a 43 | 3d 33 38 30 3a 44 3d 34 |:W%=30:C|=380:D=4|
|00001e60| 32 30 3a 0d 06 2c 34 20 | f2 46 49 4c 4c 47 52 49 |20:..,4 |.FILLGRI|
|00001e70| 44 3a f2 47 72 69 64 3a | 3a 56 25 3d 33 3a f2 53 |D:.Grid:|:V%=3:.S|
|00001e80| 65 74 75 70 3a 57 25 3d | 33 30 3a 43 3d 38 32 38 |etup:W%=|30:C=828|
|00001e90| 3a 44 3d 34 33 30 3a 0d | 06 36 1a 20 f2 46 49 4c |:D=430:.|.6. .FIL|
|00001ea0| 4c 47 52 49 44 3a f2 47 | 72 69 64 3a 56 25 3d 34 |LGRID:.G|rid:V%=4|
|00001eb0| 3a 0d 06 40 1e 20 f2 53 | 65 74 75 70 3a 43 3d 33 |:..@. .S|etup:C=3|
|00001ec0| 33 37 3a 44 3d 33 30 30 | 3a 57 25 3d 33 30 3a 0d |37:D=300|:W%=30:.|
|00001ed0| 06 4a 15 20 f2 46 49 4c | 4c 47 52 49 44 3a f2 47 |.J. .FIL|LGRID:.G|
|00001ee0| 72 69 64 3a 0d 06 54 1a | 20 56 25 3d 35 3a f2 53 |rid:..T.| V%=5:.S|
|00001ef0| 65 74 75 70 3a 3a 57 25 | 3d 32 35 3a f2 52 0d 06 |etup::W%|=25:.R..|
|00001f00| 5e 19 20 43 3d 30 3a 44 | 3d 31 30 3a 56 25 3d 35 |^. C=0:D|=10:V%=5|
|00001f10| 3a f2 43 48 45 53 53 0d | 06 68 1b 20 43 3d 32 31 |:.CHESS.|.h. C=21|
|00001f20| 35 3a 44 3d 31 30 3a 56 | 25 3d 36 3a f2 43 48 45 |5:D=10:V|%=6:.CHE|
|00001f30| 53 53 0d 06 72 1b 20 43 | 3d 34 33 30 3a 44 3d 31 |SS..r. C|=430:D=1|
|00001f40| 30 3a 56 25 3d 37 3a f2 | 43 48 45 53 53 0d 06 7c |0:V%=7:.|CHESS..||
|00001f50| 1b 20 43 3d 36 34 35 3a | 44 3d 31 30 3a 56 25 3d |. C=645:|D=10:V%=|
|00001f60| 38 3a f2 43 48 45 53 53 | 0d 06 86 1b 20 43 3d 38 |8:.CHESS|.... C=8|
|00001f70| 36 30 3a 44 3d 31 30 3a | 56 25 3d 39 3a f2 43 48 |60:D=10:|V%=9:.CH|
|00001f80| 45 53 53 0d 06 90 1c 20 | 43 3d 31 30 37 35 3a 44 |ESS.... |C=1075:D|
|00001f90| 3d 31 30 3a 56 25 3d 30 | 3a f2 43 48 45 53 53 0d |=10:V%=0|:.CHESS.|
|00001fa0| 06 9a 1a 20 56 25 3d a8 | b3 28 31 30 29 3a ef 31 |... V%=.|.(10):.1|
|00001fb0| 38 2c 30 2c 31 34 2c 34 | 3a 0d 06 a4 56 20 f2 50 |8,0,14,4|:...V .P|
|00001fc0| 72 69 6e 74 28 22 45 6e | 74 65 72 20 47 72 69 64 |rint("En|ter Grid|
|00001fd0| 20 4e 6f 2e 31 2c 32 2c | 33 20 2d 20 30 22 2c 33 | No.1,2,|3 - 0",3|
|00001fe0| 34 30 2c 37 37 35 29 3a | f2 50 72 69 6e 74 28 22 |40,775):|.Print("|
|00001ff0| 4f 72 20 53 70 61 63 65 | 2d 52 4e 44 2c 20 58 2d |Or Space|-RND, X-|
|00002000| 45 78 69 74 22 2c 33 38 | 30 2c 36 37 35 29 3a 0d |Exit",38|0,675):.|
|00002010| 06 ae 1e 20 f7 20 8d 64 | 42 46 3a e3 20 6d 3d 31 |... . .d|BF:. m=1|
|00002020| 20 b8 20 31 30 3a f3 47 | 24 2c 78 2c 79 0d 06 b8 | . 10:.G|$,x,y...|
|00002030| 15 20 f2 50 72 69 6e 74 | 28 47 24 2c 78 2c 79 29 |. .Print|(G$,x,y)|
|00002040| 3a ed 0d 06 c2 7e 20 dc | 22 31 22 2c 31 33 37 2c |:....~ .|"1",137,|
|00002050| 34 36 35 2c 22 32 22 2c | 35 34 37 2c 34 35 35 2c |465,"2",|547,455,|
|00002060| 22 33 22 2c 31 30 35 35 | 2c 34 36 37 2c 22 34 22 |"3",1055|,467,"4"|
|00002070| 2c 36 32 30 2c 33 30 35 | 2c 22 35 22 2c 38 35 2c |,620,305|,"5",85,|
|00002080| 32 32 30 2c 22 36 22 2c | 33 30 30 2c 32 32 30 2c |220,"6",|300,220,|
|00002090| 22 37 22 2c 35 31 30 2c | 32 32 30 2c 22 38 22 2c |"7",510,|220,"8",|
|000020a0| 37 33 30 2c 32 32 30 2c | 22 39 22 2c 39 34 35 2c |730,220,|"9",945,|
|000020b0| 32 32 30 2c 22 30 22 2c | 31 31 36 30 2c 32 32 30 |220,"0",|1160,220|
|000020c0| 0d 06 cc 2d 20 55 3d a5 | 2d 34 38 3a e7 20 55 3d |...- U=.|-48:. U=|
|000020d0| 34 30 20 8c 20 ff 20 22 | 52 75 6e 20 3c 50 6f 6c |40 . . "|Run <Pol|
|000020e0| 79 24 44 69 72 3e 2e 49 | 6e 64 65 78 22 0d 06 d6 |y$Dir>.I|ndex"...|
|000020f0| 1f 20 e7 20 55 3e 39 20 | 84 20 55 3c 30 20 8c 20 |. . U>9 |. U<0 . |
|00002100| 56 25 3d 56 25 20 8b 20 | 56 25 3d 55 0d 06 e0 9a |V%=V% . |V%=U....|
|00002110| 20 e7 56 25 3d 32 8c 2a | 4b 45 59 32 20 7c 4d 37 | .V%=2.*|KEY2 |M7|
|00002120| 54 4c 44 44 44 7c 4d 33 | 52 52 54 54 55 46 7c 4d |TLDDD|M3|RRTTUF|M|
|00002130| 38 44 44 44 52 52 52 52 | 52 7c 4d 32 44 44 44 52 |8DDDRRRR|R|M2DDDR|
|00002140| 52 54 54 54 54 7c 4d 35 | 52 52 52 52 52 44 7c 4d |RTTTT|M5|RRRRRD|M|
|00002150| 3d 54 54 54 54 52 52 52 | 7c 4d 46 30 4c 4c 4c 4c |=TTTTRRR||MF0LLLL|
|00002160| 54 54 54 7c 4d 34 54 4c | 4c 4c 44 44 44 7c 4d 2d |TTT|M4TL|LLDDD|M-|
|00002170| 54 54 54 4c 4c 44 7c 4d | 36 46 54 44 44 44 52 7c |TTTLLD|M|6FTDDDR||
|00002180| 4d 39 44 54 54 54 54 54 | 54 54 54 54 54 7c 4d 31 |M9DTTTTT|TTTTT|M1|
|00002190| 44 54 54 54 54 54 54 54 | 54 54 54 54 54 54 54 54 |DTTTTTTT|TTTTTTTT|
|000021a0| 4c 4c 4c 4c 7c 4d 0d 06 | ea ad 20 e7 56 25 3d 33 |LLLL|M..|.. .V%=3|
|000021b0| 8c 2a 4b 45 59 32 20 7c | 4d 34 54 54 4c 4c 4c 4c |.*KEY2 ||M4TTLLLL|
|000021c0| 4c 4c 44 44 44 7c 4d 3d | 54 54 4c 4c 4c 4c 44 7c |LLDDD|M=|TTLLLLD||
|000021d0| 4d 2d 54 54 54 44 44 44 | 52 52 52 52 52 7c 4d 30 |M-TTTDDD|RRRRR|M0|
|000021e0| 44 44 44 44 4c 4c 4c 7c | 4d 46 37 54 44 44 44 44 |DDDDLLL||MF7TDDDD|
|000021f0| 4c 4c 4c 4c 7c 4d 36 54 | 4c 4c 4c 4c 4c 4c 44 44 |LLLL|M6T|LLLLLLDD|
|00002200| 44 44 54 54 54 54 7c 4d | 39 54 54 54 44 44 44 4c |DDTTTT|M|9TTTDDDL|
|00002210| 7c 4d 38 54 44 44 44 52 | 52 7c 4d 35 44 44 52 52 ||M8TDDDR|R|M5DDRR|
|00002220| 52 7c 4d 32 54 44 44 44 | 44 52 52 52 52 7c 4d 33 |R|M2TDDD|DRRRR|M3|
|00002230| 46 54 54 54 52 52 52 52 | 52 52 44 44 7c 4d 31 54 |FTTTRRRR|RRDD|M1T|
|00002240| 54 54 54 54 54 54 54 54 | 54 54 54 54 54 44 44 44 |TTTTTTTT|TTTTTDDD|
|00002250| 44 7c 4d 0d 06 f4 92 20 | e7 56 25 3d 31 8c 2a 4b |D|M.... |.V%=1.*K|
|00002260| 45 59 32 20 7c 4d 36 54 | 52 52 52 44 44 44 44 7c |EY2 |M6T|RRRDDDD||
|00002270| 4d 2d 52 44 44 7c 4d 35 | 4c 44 7c 4d 34 54 4c 4c |M-RDD|M5|LD|M4TLL|
|00002280| 4c 44 44 44 44 7c 4d 33 | 44 44 44 44 7c 4d 31 4c |LDDDD|M3|DDDD|M1L|
|00002290| 4c 54 54 54 54 54 54 44 | 44 44 7c 4d 38 4c 4c 4c |LTTTTTTD|DD|M8LLL|
|000022a0| 44 54 54 54 54 54 54 7c | 4d 32 46 54 54 54 7c 4d |DTTTTTT||M2FTTT|M|
|000022b0| 37 44 44 4c 4c 4c 7c 4d | 30 54 52 52 52 52 52 7c |7DDLLL|M|0TRRRRR||
|000022c0| 4d 3d 52 54 54 54 52 52 | 52 52 52 44 44 44 7c 4d |M=RTTTRR|RRRDDD|M|
|000022d0| 39 44 52 52 52 54 54 54 | 54 54 54 54 54 54 54 54 |9DRRRTTT|TTTTTTTT|
|000022e0| 54 54 54 7c 4d 0d 06 fe | 10 20 e7 56 25 3d 34 8c |TTT|M...|. .V%=4.|
|000022f0| 2a 4b 45 59 32 0d 07 08 | 0d 20 dd f2 53 65 74 75 |*KEY2...|. ..Setu|
|00002300| 70 3a 0d 07 12 30 20 ef | 31 39 2c 35 2c 31 36 2c |p:...0 .|19,5,16,|
|00002310| 32 30 30 2c 31 30 2c 32 | 30 30 3a f4 20 50 55 52 |200,10,2|00:. PUR|
|00002320| 50 4c 45 2c 20 27 55 53 | 45 44 27 20 43 4f 4c 4f |PLE, 'US|ED' COLO|
|00002330| 55 52 0d 07 1c 21 20 ef | 31 39 2c 32 2c 31 36 2c |UR...! .|19,2,16,|
|00002340| 32 35 35 2c 32 35 35 2c | 32 35 35 3a f4 20 47 52 |255,255,|255:. GR|
|00002350| 45 45 4e 0d 07 26 1c 20 | ef 31 39 2c 34 2c 31 36 |EEN..&. |.19,4,16|
|00002360| 2c 30 2c 30 2c 32 35 35 | 3a f4 20 42 4c 55 45 0d |,0,0,255|:. BLUE.|
|00002370| 07 30 47 20 43 31 3d 32 | 35 35 3a 43 32 3d 32 35 |.0G C1=2|55:C2=25|
|00002380| 35 3a 43 33 3d 35 30 3a | 46 25 3d 30 3a 43 3d 58 |5:C3=50:|F%=0:C=X|
|00002390| 25 3a 44 3d 59 25 3a 5a | 24 3d 22 22 3a 4c 24 3d |%:D=Y%:Z|$="":L$=|
|000023a0| 22 22 3a 61 25 3d 31 3a | 4f 6e 54 6f 70 25 3d 30 |"":a%=1:|OnTop%=0|
|000023b0| 3a 54 25 3d 30 3a 0d 07 | 3a 1e 20 e3 4e 25 3d 31 |:T%=0:..|:. .N%=1|
|000023c0| b8 31 32 3a 55 28 4e 25 | 29 3d 30 3a ed 3a 44 25 |.12:U(N%|)=0:.:D%|
|000023d0| 3d 2d 31 3a 0d 07 44 0a | 20 f7 8d 44 62 47 0d 07 |=-1:..D.| ..DbG..|
|000023e0| 4e 1f 20 e3 4b 3d 30 b8 | 56 25 3a f3 53 25 2c 48 |N. .K=0.|V%:.S%,H|
|000023f0| 25 2c 49 25 2c 58 25 2c | 59 25 3a ed 3a 0d 07 58 |%,I%,X%,|Y%:.:..X|
|00002400| 0c 20 57 25 3d 49 25 3a | e1 0d 07 62 8d 20 dc 38 |. W%=I%:|...b. .8|
|00002410| 2c 38 2c 36 30 2c 34 32 | 30 2c 34 2c 31 30 2c 36 |,8,60,42|0,4,10,6|
|00002420| 2c 31 30 30 2c 32 37 30 | 2c 34 2c 31 32 2c 35 2c |,100,270|,4,12,5,|
|00002430| 31 30 30 2c 37 30 2c 34 | 2c 31 35 2c 34 2c 38 30 |100,70,4|,15,4,80|
|00002440| 2c 37 30 2c 38 34 2c 32 | 30 2c 33 2c 36 30 2c 37 |,70,84,2|0,3,60,7|
|00002450| 30 2c 31 30 34 2c 38 2c | 38 2c 36 30 2c 34 32 30 |0,104,8,|8,60,420|
|00002460| 2c 34 2c 38 2c 38 2c 36 | 30 2c 34 32 30 2c 34 2c |,4,8,8,6|0,420,4,|
|00002470| 38 2c 38 2c 36 30 2c 34 | 32 30 2c 34 2c 38 2c 38 |8,8,60,4|20,4,8,8|
|00002480| 2c 36 30 2c 34 32 30 2c | 34 2c 38 2c 38 2c 36 30 |,60,420,|4,8,8,60|
|00002490| 2c 34 32 30 2c 34 0d 07 | 6c 0c 20 dd f2 4d 65 6e |,420,4..|l. ..Men|
|000024a0| 75 3a 0d 07 76 17 20 e7 | 43 25 3d 39 84 43 25 3d |u:..v. .|C%=9.C%=|
|000024b0| 37 30 3a 8b e5 8d 74 4a | 47 0d 07 80 3a 20 e7 55 |70:...tJ|G...: .U|
|000024c0| 28 4e 25 29 3c 3e 4e 25 | e6 30 2c 46 25 2b 32 2b |(N%)<>N%|.0,F%+2+|
|000024d0| 44 25 3a f2 44 72 61 77 | 3a e1 20 8b e6 30 2c 56 |D%:.Draw|:. ..0,V|
|000024e0| 3a f2 44 72 61 77 3a e6 | 30 2c 46 25 2b 32 2b 44 |:.Draw:.|0,F%+2+D|
|000024f0| 25 3a e1 0d 07 8a 3d 20 | e7 62 25 3d 4e 25 20 e6 |%:....= |.b%=N% .|
|00002500| 30 2c 46 25 2b 32 2b 44 | 25 3a f2 44 72 61 77 3a |0,F%+2+D|%:.Draw:|
|00002510| e1 20 8b 20 e7 20 55 28 | 4e 25 29 3c 3e 4e 25 20 |. . . U(|N%)<>N% |
|00002520| e1 20 8b 20 e6 30 2c 56 | 3a f2 44 72 61 77 3a e1 |. . .0,V|:.Draw:.|
|00002530| 0d 07 94 0a 20 dd f2 57 | 69 6e 0d 07 95 07 20 ef |.... ..W|in.... .|
|00002540| 37 0d 07 9e 22 20 f4 20 | 45 4e 54 45 52 20 53 49 |7..." . |ENTER SI|
|00002550| 4c 4c 59 20 53 4f 55 4e | 44 20 48 45 52 45 2e 2e |LLY SOUN|D HERE..|
|00002560| 2e 2e 2e 0d 07 a8 0c 20 | 2a 46 58 32 31 2c 30 0d |....... |*FX21,0.|
|00002570| 07 b2 06 20 e1 0d 07 bc | 09 20 dd f2 53 3a 0d 07 |... ....|. ..S:..|
|00002580| c6 1d 20 f2 53 65 74 46 | 6c 69 70 4d 65 6e 75 3a |.. .SetF|lipMenu:|
|00002590| f2 47 72 69 64 4d 65 6e | 75 3a e1 0d 07 d0 24 20 |.GridMen|u:....$ |
|000025a0| dd f2 44 72 61 77 3a e7 | 20 28 61 25 3d 30 20 80 |..Draw:.| (a%=0 .|
|000025b0| 20 54 25 3c 3e 31 32 29 | 20 f2 57 61 69 74 3a 0d | T%<>12)| .Wait:.|
|000025c0| 07 da 11 20 f2 42 4c 41 | 4e 4b 3a ec 58 2c 59 3a |... .BLA|NK:.X,Y:|
|000025d0| 0d 07 e4 51 20 e7 20 4e | 25 3d 31 20 ef 32 35 2c |...Q . N|%=1 .25,|
|000025e0| 31 2c 58 28 32 29 2a 35 | 3b 59 28 32 29 2a 35 3b |1,X(2)*5|;Y(2)*5;|
|000025f0| 32 35 2c 31 2c 58 28 31 | 29 3b 59 28 31 29 3b 32 |25,1,X(1|);Y(1);2|
|00002600| 35 2c 31 2c 58 28 34 29 | 2a 35 3b 59 28 34 29 2a |5,1,X(4)|*5;Y(4)*|
|00002610| 35 3b 32 35 2c 31 2c 58 | 28 33 29 3b 59 28 33 29 |5;25,1,X|(3);Y(3)|
|00002620| 3b 0d 07 ee 73 20 e7 20 | 4e 25 3d 32 20 ef 32 35 |;...s . |N%=2 .25|
|00002630| 2c 31 2c 58 28 32 29 2a | 32 3b 59 28 32 29 2a 32 |,1,X(2)*|2;Y(2)*2|
|00002640| 3b 32 35 2c 31 2c 58 28 | 31 29 2a 32 3b 59 28 31 |;25,1,X(|1)*2;Y(1|
|00002650| 29 2a 32 3b 32 35 2c 31 | 2c 58 28 34 29 3b 59 28 |)*2;25,1|,X(4);Y(|
|00002660| 34 29 3b 32 35 2c 31 2c | 58 28 31 29 3b 59 28 31 |4);25,1,|X(1);Y(1|
|00002670| 29 3b 32 35 2c 31 2c 58 | 28 34 29 3b 59 28 34 29 |);25,1,X|(4);Y(4)|
|00002680| 3b 32 35 2c 31 2c 58 28 | 33 29 2a 33 3b 59 28 33 |;25,1,X(|3)*3;Y(3|
|00002690| 29 2a 33 3b 0d 07 f8 73 | 20 e7 20 4e 25 3d 33 20 |)*3;...s| . N%=3 |
|000026a0| ef 32 35 2c 31 2c 58 28 | 32 29 2a 34 3b 59 28 32 |.25,1,X(|2)*4;Y(2|
|000026b0| 29 2a 34 3b 32 35 2c 31 | 2c 58 28 31 29 2a 32 3b |)*4;25,1|,X(1)*2;|
|000026c0| 59 28 31 29 2a 32 3b 32 | 35 2c 31 2c 58 28 34 29 |Y(1)*2;2|5,1,X(4)|
|000026d0| 3b 59 28 34 29 3b 32 35 | 2c 31 2c 58 28 33 29 3b |;Y(4);25|,1,X(3);|
|000026e0| 59 28 33 29 3b 32 35 2c | 31 2c 58 28 34 29 2a 33 |Y(3);25,|1,X(4)*3|
|000026f0| 3b 59 28 34 29 2a 33 3b | 32 35 2c 31 2c 58 28 33 |;Y(4)*3;|25,1,X(3|
|00002700| 29 3b 59 28 33 29 3b 0d | 08 02 77 20 e7 20 4e 25 |);Y(3);.|..w . N%|
|00002710| 3d 34 20 ef 32 35 2c 31 | 2c 58 28 32 29 2a 33 3b |=4 .25,1|,X(2)*3;|
|00002720| 59 28 32 29 2a 33 3b 32 | 35 2c 31 2c 58 28 31 29 |Y(2)*3;2|5,1,X(1)|
|00002730| 2a 33 3b 59 28 31 29 2a | 33 3b 32 35 2c 31 2c 58 |*3;Y(1)*|3;25,1,X|
|00002740| 28 34 29 3b 59 28 34 29 | 3b 32 35 2c 31 2c 58 28 |(4);Y(4)|;25,1,X(|
|00002750| 33 29 2a 32 3b 59 28 33 | 29 2a 32 3b 32 35 2c 31 |3)*2;Y(3|)*2;25,1|
|00002760| 2c 58 28 34 29 2a 32 3b | 59 28 34 29 2a 32 3b 32 |,X(4)*2;|Y(4)*2;2|
|00002770| 35 2c 31 2c 58 28 33 29 | 3b 59 28 33 29 3b 0d 08 |5,1,X(3)|;Y(3);..|
|00002780| 0c c1 20 e7 20 4e 25 3d | 35 20 ef 32 35 2c 31 2c |.. . N%=|5 .25,1,|
|00002790| 58 28 32 29 3b 59 28 32 | 29 3b 32 35 2c 31 2c 58 |X(2);Y(2|);25,1,X|
|000027a0| 28 33 29 3b 59 28 33 29 | 3b 32 35 2c 31 2c 58 28 |(3);Y(3)|;25,1,X(|
|000027b0| 32 29 3b 59 28 32 29 3b | 32 35 2c 31 2c 58 28 31 |2);Y(2);|25,1,X(1|
|000027c0| 29 3b 59 28 31 29 3b 32 | 35 2c 31 2c 58 28 32 29 |);Y(1);2|5,1,X(2)|
|000027d0| 3b 59 28 32 29 3b 32 35 | 2c 31 2c 58 28 31 29 3b |;Y(2);25|,1,X(1);|
|000027e0| 59 28 31 29 3b 32 35 2c | 31 2c 58 28 34 29 3b 59 |Y(1);25,|1,X(4);Y|
|000027f0| 28 34 29 3b 32 35 2c 31 | 2c 58 28 31 29 3b 59 28 |(4);25,1|,X(1);Y(|
|00002800| 31 29 3b 32 35 2c 31 2c | 58 28 34 29 3b 59 28 34 |1);25,1,|X(4);Y(4|
|00002810| 29 3b 32 35 2c 31 2c 58 | 28 33 29 3b 59 28 33 29 |);25,1,X|(3);Y(3)|
|00002820| 3b 32 35 2c 31 2c 58 28 | 34 29 3b 59 28 34 29 3b |;25,1,X(|4);Y(4);|
|00002830| 32 35 2c 31 2c 58 28 33 | 29 3b 59 28 33 29 3b 0d |25,1,X(3|);Y(3);.|
|00002840| 08 16 95 20 e7 20 4e 25 | 3d 36 20 ef 32 35 2c 31 |... . N%|=6 .25,1|
|00002850| 2c 58 28 32 29 3b 59 28 | 32 29 3b 32 35 2c 31 2c |,X(2);Y(|2);25,1,|
|00002860| 58 28 31 29 3b 59 28 31 | 29 3b 32 35 2c 31 2c 58 |X(1);Y(1|);25,1,X|
|00002870| 28 32 29 2a 32 3b 59 28 | 32 29 2a 32 3b 32 35 2c |(2)*2;Y(|2)*2;25,|
|00002880| 31 2c 58 28 31 29 2a 32 | 3b 59 28 31 29 2a 32 3b |1,X(1)*2|;Y(1)*2;|
|00002890| 32 35 2c 31 2c 58 28 34 | 29 3b 59 28 34 29 3b 32 |25,1,X(4|);Y(4);2|
|000028a0| 35 2c 31 2c 58 28 33 29 | 3b 59 28 33 29 3b 32 35 |5,1,X(3)|;Y(3);25|
|000028b0| 2c 31 2c 58 28 34 29 2a | 32 3b 59 28 34 29 2a 32 |,1,X(4)*|2;Y(4)*2|
|000028c0| 3b 32 35 2c 31 2c 58 28 | 33 29 2a 32 3b 59 28 33 |;25,1,X(|3)*2;Y(3|
|000028d0| 29 2a 32 3b 0d 08 20 ab | 20 e7 20 4e 25 3d 37 20 |)*2;.. .| . N%=7 |
|000028e0| ef 32 35 2c 31 2c 58 28 | 32 29 2a 32 3b 59 28 32 |.25,1,X(|2)*2;Y(2|
|000028f0| 29 2a 32 3b 32 35 2c 31 | 2c 58 28 31 29 3b 59 28 |)*2;25,1|,X(1);Y(|
|00002900| 31 29 3b 32 35 2c 31 2c | 58 28 32 29 3b 59 28 32 |1);25,1,|X(2);Y(2|
|00002910| 29 3b 32 35 2c 31 2c 58 | 28 31 29 3b 59 28 31 29 |);25,1,X|(1);Y(1)|
|00002920| 3b 32 35 2c 31 2c 58 28 | 34 29 3b 59 28 34 29 3b |;25,1,X(|4);Y(4);|
|00002930| 32 35 2c 31 2c 58 28 31 | 29 3b 59 28 31 29 3b 32 |25,1,X(1|);Y(1);2|
|00002940| 35 2c 31 2c 58 28 34 29 | 3b 59 28 34 29 3b 32 35 |5,1,X(4)|;Y(4);25|
|00002950| 2c 31 2c 58 28 33 29 2a | 32 3b 59 28 33 29 2a 32 |,1,X(3)*|2;Y(3)*2|
|00002960| 3b 32 35 2c 31 2c 58 28 | 34 29 3b 59 28 34 29 3b |;25,1,X(|4);Y(4);|
|00002970| 32 35 2c 31 2c 58 28 33 | 29 3b 59 28 33 29 3b 0d |25,1,X(3|);Y(3);.|
|00002980| 08 2a 91 20 e7 20 4e 25 | 3d 38 20 ef 32 35 2c 31 |.*. . N%|=8 .25,1|
|00002990| 2c 58 28 32 29 2a 33 3b | 59 28 32 29 2a 33 3b 32 |,X(2)*3;|Y(2)*3;2|
|000029a0| 35 2c 31 2c 58 28 31 29 | 2a 32 3b 59 28 31 29 2a |5,1,X(1)|*2;Y(1)*|
|000029b0| 32 3b 32 35 2c 31 2c 58 | 28 34 29 3b 59 28 34 29 |2;25,1,X|(4);Y(4)|
|000029c0| 3b 32 35 2c 31 2c 58 28 | 33 29 3b 59 28 33 29 3b |;25,1,X(|3);Y(3);|
|000029d0| 32 35 2c 31 2c 58 28 34 | 29 3b 59 28 34 29 3b 32 |25,1,X(4|);Y(4);2|
|000029e0| 35 2c 31 2c 58 28 31 29 | 3b 59 28 31 29 3b 32 35 |5,1,X(1)|;Y(1);25|
|000029f0| 2c 31 2c 58 28 34 29 3b | 59 28 34 29 3b 32 35 2c |,1,X(4);|Y(4);25,|
|00002a00| 31 2c 58 28 33 29 2a 32 | 3b 59 28 33 29 2a 32 3b |1,X(3)*2|;Y(3)*2;|
|00002a10| 0d 08 34 91 20 e7 20 4e | 25 3d 39 20 ef 32 35 2c |..4. . N|%=9 .25,|
|00002a20| 31 2c 58 28 32 29 2a 33 | 3b 59 28 32 29 2a 33 3b |1,X(2)*3|;Y(2)*3;|
|00002a30| 32 35 2c 31 2c 58 28 31 | 29 3b 59 28 31 29 3b 32 |25,1,X(1|);Y(1);2|
|00002a40| 35 2c 31 2c 58 28 34 29 | 3b 59 28 34 29 3b 32 35 |5,1,X(4)|;Y(4);25|
|00002a50| 2c 31 2c 58 28 31 29 2a | 32 3b 59 28 31 29 2a 32 |,1,X(1)*|2;Y(1)*2|
|00002a60| 3b 32 35 2c 31 2c 58 28 | 34 29 3b 59 28 34 29 3b |;25,1,X(|4);Y(4);|
|00002a70| 32 35 2c 31 2c 58 28 33 | 29 2a 32 3b 59 28 33 29 |25,1,X(3|)*2;Y(3)|
|00002a80| 2a 32 3b 32 35 2c 31 2c | 58 28 34 29 3b 59 28 34 |*2;25,1,|X(4);Y(4|
|00002a90| 29 3b 32 35 2c 31 2c 58 | 28 33 29 3b 59 28 33 29 |);25,1,X|(3);Y(3)|
|00002aa0| 3b 0d 08 3e 92 20 e7 20 | 4e 25 3d 31 30 20 ef 32 |;..>. . |N%=10 .2|
|00002ab0| 35 2c 31 2c 58 28 32 29 | 2a 33 3b 59 28 32 29 2a |5,1,X(2)|*3;Y(2)*|
|00002ac0| 33 3b 32 35 2c 31 2c 58 | 28 31 29 3b 59 28 31 29 |3;25,1,X|(1);Y(1)|
|00002ad0| 3b 32 35 2c 31 2c 58 28 | 32 29 3b 59 28 32 29 3b |;25,1,X(|2);Y(2);|
|00002ae0| 32 35 2c 31 2c 58 28 31 | 29 3b 59 28 31 29 3b 32 |25,1,X(1|);Y(1);2|
|00002af0| 35 2c 31 2c 58 28 34 29 | 2a 32 3b 59 28 34 29 2a |5,1,X(4)|*2;Y(4)*|
|00002b00| 32 3b 32 35 2c 31 2c 58 | 28 33 29 3b 59 28 33 29 |2;25,1,X|(3);Y(3)|
|00002b10| 3b 32 35 2c 31 2c 58 28 | 34 29 2a 32 3b 59 28 34 |;25,1,X(|4)*2;Y(4|
|00002b20| 29 2a 32 3b 32 35 2c 31 | 2c 58 28 33 29 3b 59 28 |)*2;25,1|,X(3);Y(|
|00002b30| 33 29 3b 0d 08 48 ac 20 | e7 20 4e 25 3d 31 31 20 |3);..H. |. N%=11 |
|00002b40| ef 32 35 2c 31 2c 58 28 | 32 29 2a 32 3b 59 28 32 |.25,1,X(|2)*2;Y(2|
|00002b50| 29 2a 32 3b 32 35 2c 31 | 2c 58 28 31 29 3b 59 28 |)*2;25,1|,X(1);Y(|
|00002b60| 31 29 3b 32 35 2c 31 2c | 58 28 32 29 3b 59 28 32 |1);25,1,|X(2);Y(2|
|00002b70| 29 3b 32 35 2c 31 2c 58 | 28 31 29 2a 32 3b 59 28 |);25,1,X|(1)*2;Y(|
|00002b80| 31 29 2a 32 3b 32 35 2c | 31 2c 58 28 34 29 3b 59 |1)*2;25,|1,X(4);Y|
|00002b90| 28 34 29 3b 32 35 2c 31 | 2c 58 28 33 29 3b 59 28 |(4);25,1|,X(3);Y(|
|00002ba0| 33 29 3b 32 35 2c 31 2c | 58 28 34 29 3b 59 28 34 |3);25,1,|X(4);Y(4|
|00002bb0| 29 3b 32 35 2c 31 2c 58 | 28 33 29 3b 59 28 33 29 |);25,1,X|(3);Y(3)|
|00002bc0| 3b 32 35 2c 31 2c 58 28 | 34 29 3b 59 28 34 29 3b |;25,1,X(|4);Y(4);|
|00002bd0| 32 35 2c 31 2c 58 28 33 | 29 3b 59 28 33 29 3b 0d |25,1,X(3|);Y(3);.|
|00002be0| 08 52 8e 20 e7 20 4e 25 | 3d 31 32 20 ef 32 35 2c |.R. . N%|=12 .25,|
|00002bf0| 31 2c 58 28 32 29 2a 34 | 3b 59 28 32 29 2a 34 3b |1,X(2)*4|;Y(2)*4;|
|00002c00| 32 35 2c 31 2c 58 28 31 | 29 3b 59 28 31 29 3b 32 |25,1,X(1|);Y(1);2|
|00002c10| 35 2c 31 2c 58 28 34 29 | 3b 59 28 34 29 3b 32 35 |5,1,X(4)|;Y(4);25|
|00002c20| 2c 31 2c 58 28 31 29 3b | 59 28 31 29 3b 32 35 2c |,1,X(1);|Y(1);25,|
|00002c30| 31 2c 58 28 34 29 3b 59 | 28 34 29 3b 32 35 2c 31 |1,X(4);Y|(4);25,1|
|00002c40| 2c 58 28 33 29 3b 59 28 | 33 29 3b 32 35 2c 31 2c |,X(3);Y(|3);25,1,|
|00002c50| 58 28 34 29 2a 32 3b 59 | 28 34 29 2a 32 3b 32 35 |X(4)*2;Y|(4)*2;25|
|00002c60| 2c 31 2c 58 28 33 29 3b | 59 28 33 29 3b 0d 08 5c |,1,X(3);|Y(3);..\|
|00002c70| 06 20 e1 0d 08 66 0f 20 | dd f2 46 49 4c 4c 47 52 |. ...f. |..FILLGR|
|00002c80| 49 44 0d 08 70 0a 20 ec | 20 43 2c 44 0d 08 7a 1a |ID..p. .| C,D..z.|
|00002c90| 20 ef 31 39 2c 57 57 2c | 31 36 2c 31 35 30 2c 31 | .19,WW,|16,150,1|
|00002ca0| 35 30 2c 31 35 30 0d 08 | 84 0a 20 e6 31 2c 57 57 |50,150..|.. .1,WW|
|00002cb0| 0d 08 8e 38 20 f0 31 2c | 53 25 2a 57 25 2c 30 3a |...8 .1,|S%*W%,0:|
|00002cc0| f0 38 31 2c 30 2c 57 25 | 2a 48 25 3a f0 31 2c 2d |.81,0,W%|*H%:.1,-|
|00002cd0| 28 53 25 2a 57 25 29 2c | 30 3a f0 38 31 2c 30 2c |(S%*W%),|0:.81,0,|
|00002ce0| 2d 28 57 25 2a 48 25 29 | 0d 08 98 06 20 e1 0d 08 |-(W%*H%)|.... ...|
|00002cf0| a2 0c 20 dd f2 47 72 69 | 64 3a 0d 08 ac 15 20 ef |.. ..Gri|d:.... .|
|00002d00| 32 33 3b 38 32 30 32 3b | 30 3b 30 3b 30 3b 3a 0d |23;8202;|0;0;0;:.|
|00002d10| 08 b6 0e 20 ec 20 43 2c | 44 3a ea 51 25 0d 08 c0 |... . C,|D:.Q%...|
|00002d20| 0f 20 ec 43 2c 44 3a e6 | 30 2c 4a 3a 0d 08 ca 2e |. .C,D:.|0,J:....|
|00002d30| 20 e3 51 25 3d 31 b8 53 | 25 2b 31 3a f0 31 2c 30 | .Q%=1.S|%+1:.1,0|
|00002d40| 2c 28 57 25 2a 48 25 29 | 3a f0 30 2c 57 25 2c 2d |,(W%*H%)|:.0,W%,-|
|00002d50| 28 57 25 2a 48 25 29 3a | ed 3a 0d 08 d4 39 20 f0 |(W%*H%):|.:...9 .|
|00002d60| 30 2c 2d 57 25 2c 30 3a | e3 51 25 3d 31 b8 48 25 |0,-W%,0:|.Q%=1.H%|
|00002d70| 2b 31 3a f0 31 2c 2d 28 | 57 25 2a 53 25 29 2c 30 |+1:.1,-(|W%*S%),0|
|00002d80| 3a f0 30 2c 2b 28 57 25 | 2a 53 25 29 2c 2b 57 25 |:.0,+(W%|*S%),+W%|
|00002d90| 3a ed 3a 0d 08 de 09 20 | ec 43 2c 44 0d 08 e8 06 |:.:.... |.C,D....|
|00002da0| 20 e1 0d 08 f2 09 20 dd | f2 4a 3a 0d 08 fc 08 20 | ..... .|.J:.... |
|00002db0| f2 52 3a 0d 09 06 32 20 | e7 4e 25 3d 34 84 28 4e |.R:...2 |.N%=4.(N|
|00002dc0| 25 3e 35 80 4e 25 3c 31 | 30 29 84 4e 25 3d 31 31 |%>5.N%<1|0).N%=11|
|00002dd0| 3a 46 3d 33 3a 8b e7 4e | 25 3d 32 3a 46 3d 32 3a |:F=3:..N|%=2:F=2:|
|00002de0| 8b 8d 54 5a 49 0d 09 10 | 42 20 e7 46 25 3d 30 58 |..TZI...|B .F%=0X|
|00002df0| 3d 58 2b 28 58 28 34 29 | 2a 46 29 3a 59 3d 59 2b |=X+(X(4)|*F):Y=Y+|
|00002e00| 28 59 28 34 29 2a 46 29 | 3a e1 3a 8b 58 3d 58 2b |(Y(4)*F)|:.:.X=X+|
|00002e10| 28 58 28 33 29 2a 46 29 | 3a 59 3d 59 2b 28 59 28 |(X(3)*F)|:Y=Y+(Y(|
|00002e20| 33 29 2a 46 29 3a e1 0d | 09 1a 32 20 e7 4e 25 3c |3)*F):..|..2 .N%<|
|00002e30| 3e 35 3a f7 8d 54 64 49 | 3a e3 6a 25 3d 30 b8 46 |>5:..TdI|:.j%=0.F|
|00002e40| 25 3a e3 69 25 3d 31 b8 | 34 3a f3 41 28 69 25 29 |%:.i%=1.|4:.A(i%)|
|00002e50| 2c 42 28 69 25 29 3a ed | 2c 0d 09 24 5d 20 dc 32 |,B(i%):.|,..$] .2|
|00002e60| 2a 57 25 2c 33 2a 57 25 | 2c 33 2a 57 25 2c 2d 32 |*W%,3*W%|,3*W%,-2|
|00002e70| 2a 57 25 2c 2d 32 2a 57 | 25 2c 2d 33 2a 57 25 2c |*W%,-2*W|%,-3*W%,|
|00002e80| 2d 33 2a 57 25 2c 32 2a | 57 25 2c 2d 33 2a 57 25 |-3*W%,2*|W%,-3*W%|
|00002e90| 2c 2d 32 2a 57 25 2c 2d | 32 2a 57 25 2c 33 2a 57 |,-2*W%,-|2*W%,3*W|
|00002ea0| 25 2c 33 2a 57 25 2c 32 | 2a 57 25 2c 32 2a 57 25 |%,3*W%,2|*W%,2*W%|
|00002eb0| 2c 2d 33 2a 57 25 0d 09 | 2e 1d 20 58 3d 58 2b 28 |,-3*W%..|.. X=X+(|
|00002ec0| 41 28 55 25 29 29 3a 59 | 3d 59 2b 28 42 28 55 25 |A(U%)):Y|=Y+(B(U%|
|00002ed0| 29 29 3a 0d 09 38 07 20 | e1 3a 0d 09 42 42 20 e7 |)):..8. |.:..BB .|
|00002ee0| 46 25 3d 30 58 3d 58 2b | 28 58 28 34 29 2a 46 29 |F%=0X=X+|(X(4)*F)|
|00002ef0| 3a 59 3d 59 2b 28 59 28 | 34 29 2a 46 29 3a e1 3a |:Y=Y+(Y(|4)*F):.:|
|00002f00| 8b 58 3d 58 2b 28 58 28 | 33 29 2a 46 29 3a 59 3d |.X=X+(X(|3)*F):Y=|
|00002f10| 59 2b 28 59 28 33 29 2a | 46 29 3a e1 0d 09 4c 09 |Y+(Y(3)*|F):...L.|
|00002f20| 20 dd f2 52 3a 0d 09 56 | 18 20 e7 55 25 3e 34 55 | ..R:..V|. .U%>4U|
|00002f30| 25 3d 31 8b e7 55 25 3d | 30 55 25 3d 34 0d 09 60 |%=1..U%=|0U%=4..`|
|00002f40| 19 20 f7 8d 44 7e 49 3a | e3 69 25 3d 31 b8 55 25 |. ..D~I:|.i%=1.U%|
|00002f50| 2b 34 2a 46 25 3a 0d 09 | 6a 1d 20 e3 6a 25 3d 31 |+4*F%:..|j. .j%=1|
|00002f60| b8 34 3a f3 58 28 6a 25 | 29 2c 59 28 6a 25 29 3a |.4:.X(j%|),Y(j%):|
|00002f70| ed 2c 3a 0d 09 74 06 20 | e1 0d 09 7e b5 20 dc 57 |.,:..t. |...~. .W|
|00002f80| 25 2c 30 2c 30 2c 2d 57 | 25 2c 2d 57 25 2c 30 2c |%,0,0,-W|%,-W%,0,|
|00002f90| 30 2c 57 25 2c 30 2c 2d | 57 25 2c 2d 57 25 2c 30 |0,W%,0,-|W%,-W%,0|
|00002fa0| 2c 30 2c 57 25 2c 57 25 | 2c 30 2c 2d 57 25 2c 30 |,0,W%,W%|,0,-W%,0|
|00002fb0| 2c 30 2c 57 25 2c 57 25 | 2c 30 2c 30 2c 2d 57 25 |,0,W%,W%|,0,0,-W%|
|00002fc0| 2c 30 2c 57 25 2c 57 25 | 2c 30 2c 30 2c 2d 57 25 |,0,W%,W%|,0,0,-W%|
|00002fd0| 2c 2d 57 25 2c 30 2c 57 | 25 2c 30 2c 30 2c 57 25 |,-W%,0,W|%,0,0,W%|
|00002fe0| 2c 2d 57 25 2c 30 2c 30 | 2c 2d 57 25 2c 30 2c 2d |,-W%,0,0|,-W%,0,-|
|00002ff0| 57 25 2c 57 25 2c 30 2c | 30 2c 57 25 2c 2d 57 25 |W%,W%,0,|0,W%,-W%|
|00003000| 2c 30 2c 2d 57 25 2c 30 | 2c 30 2c 2d 57 25 2c 57 |,0,-W%,0|,0,-W%,W|
|00003010| 25 2c 30 2c 30 2c 57 25 | 2c 30 2c 57 25 2c 2d 57 |%,0,0,W%|,0,W%,-W|
|00003020| 25 2c 30 2c 30 2c 2d 57 | 25 2c 57 25 2c 30 0d 09 |%,0,0,-W|%,W%,0..|
|00003030| 88 14 20 dd f2 46 69 6c | 6c 50 69 65 63 65 73 28 |.. ..Fil|lPieces(|
|00003040| 70 29 0d 09 92 08 20 f2 | 52 3a 0d 09 9c 12 20 ec |p).... .|R:.... .|
|00003050| 58 2c 59 3a 51 3d 58 3a | 52 3d 59 3a 0d 09 a6 17 |X,Y:Q=X:|R=Y:....|
|00003060| 20 e7 20 4e 25 3c 31 84 | 4e 25 3e 31 32 20 e5 8d | . N%<1.|N%>12 ..|
|00003070| 54 72 4a 0d 09 b0 23 20 | e7 4e 25 3d 31 e3 50 3d |TrJ...# |.N%=1.P=|
|00003080| 31 b8 34 3a f2 62 3a f2 | 73 28 58 28 32 29 2c 59 |1.4:.b:.|s(X(2),Y|
|00003090| 28 32 29 29 3a ed 0d 09 | ba 52 20 e7 4e 25 3d 32 |(2)):...|.R .N%=2|
|000030a0| e3 50 3d 31 b8 33 3a f2 | 62 3a f2 73 28 58 28 31 |.P=1.3:.|b:.s(X(1|
|000030b0| 29 2c 59 28 31 29 29 3a | ed 3a f2 73 28 58 28 33 |),Y(1)):|.:.s(X(3|
|000030c0| 29 2a 32 2b 58 28 32 29 | 2c 28 59 28 33 29 2a 32 |)*2+X(2)|,(Y(3)*2|
|000030d0| 29 2b 59 28 32 29 29 3a | f2 62 3a f2 73 28 58 28 |)+Y(2)):|.b:.s(X(|
|000030e0| 33 29 2c 59 28 33 29 29 | 0d 09 c4 42 20 e7 4e 25 |3),Y(3))|...B .N%|
|000030f0| 3d 33 e3 50 3d 31 b8 33 | 3a f2 62 3a f2 73 28 58 |=3.P=1.3|:.b:.s(X|
|00003100| 28 32 29 2c 59 28 32 29 | 29 3a ed 3a f2 73 28 58 |(2),Y(2)|):.:.s(X|
|00003110| 28 31 29 2c 59 28 31 29 | 29 3a f2 62 3a f2 73 28 |(1),Y(1)|):.b:.s(|
|00003120| 58 28 33 29 2c 59 28 33 | 29 29 0d 09 ce 4b 20 e7 |X(3),Y(3|))...K .|
|00003130| 4e 25 3d 34 e3 50 3d 31 | b8 33 3a f2 62 3a f2 73 |N%=4.P=1|.3:.b:.s|
|00003140| 28 58 28 32 29 2c 59 28 | 32 29 29 3a ed 3a f2 73 |(X(2),Y(|2)):.:.s|
|00003150| 28 58 28 34 29 2c 59 28 | 34 29 29 3a e3 50 3d 31 |(X(4),Y(|4)):.P=1|
|00003160| b8 32 3a f2 73 28 58 28 | 31 29 2c 59 28 31 29 29 |.2:.s(X(|1),Y(1))|
|00003170| 3a f2 62 3a ed 0d 09 d8 | 58 20 e7 4e 25 3d 35 e3 |:.b:....|X .N%=5.|
|00003180| 50 3d 31 b8 33 3a f2 62 | 3a f2 73 28 58 28 32 29 |P=1.3:.b|:.s(X(2)|
|00003190| 2c 59 28 32 29 29 3a ed | 3a f2 73 28 28 58 28 34 |,Y(2)):.|:.s((X(4|
|000031a0| 29 2a 32 29 2b 58 28 31 | 29 2c 28 59 28 34 29 2a |)*2)+X(1|),(Y(4)*|
|000031b0| 32 29 2b 59 28 31 29 29 | 3a f2 62 3a f2 73 28 58 |2)+Y(1))|:.b:.s(X|
|000031c0| 28 33 29 2a 32 2c 59 28 | 33 29 2a 32 29 0d 09 e2 |(3)*2,Y(|3)*2)...|
|000031d0| 50 20 e7 4e 25 3d 36 f2 | 62 3a f2 73 28 58 28 31 |P .N%=6.|b:.s(X(1|
|000031e0| 29 2c 59 28 31 29 29 3a | e3 50 3d 31 b8 33 3a f2 |),Y(1)):|.P=1.3:.|
|000031f0| 62 3a f2 73 28 58 28 32 | 29 2c 59 28 32 29 29 3a |b:.s(X(2|),Y(2)):|
|00003200| ed 3a f2 73 28 28 58 28 | 34 29 29 2b 58 28 31 29 |.:.s((X(|4))+X(1)|
|00003210| 2c 28 59 28 34 29 29 2b | 59 28 31 29 29 0d 09 ec |,(Y(4))+|Y(1))...|
|00003220| 57 20 e7 4e 25 3d 37 f2 | 62 3a f2 73 28 58 28 32 |W .N%=7.|b:.s(X(2|
|00003230| 29 2c 59 28 32 29 29 3a | f2 62 3a f2 73 28 58 28 |),Y(2)):|.b:.s(X(|
|00003240| 31 29 2c 59 28 31 29 29 | 3a f2 62 3a f2 73 28 58 |1),Y(1))|:.b:.s(X|
|00003250| 28 32 29 2c 59 28 32 29 | 29 3a f2 62 3a f2 73 28 |(2),Y(2)|):.b:.s(|
|00003260| 58 28 31 29 2b 58 28 34 | 29 2c 59 28 31 29 2b 59 |X(1)+X(4|),Y(1)+Y|
|00003270| 28 34 29 29 0d 09 f6 5a | 20 e7 4e 25 3d 38 f2 73 |(4))...Z| .N%=8.s|
|00003280| 28 58 28 31 29 2c 59 28 | 31 29 29 3a f2 62 3a f2 |(X(1),Y(|1)):.b:.|
|00003290| 73 28 58 28 33 29 2c 59 | 28 33 29 29 3a e3 50 3d |s(X(3),Y|(3)):.P=|
|000032a0| 31 b8 33 3a f2 62 3a f2 | 73 28 58 28 32 29 2c 59 |1.3:.b:.|s(X(2),Y|
|000032b0| 28 32 29 29 3a ed 3a f2 | 73 28 58 28 34 29 2b 58 |(2)):.:.|s(X(4)+X|
|000032c0| 28 31 29 2c 59 28 34 29 | 2b 59 28 31 29 29 0d 0a |(1),Y(4)|+Y(1))..|
|000032d0| 00 4e 20 e7 4e 25 3d 39 | f2 62 3a e3 50 3d 31 b8 |.N .N%=9|.b:.P=1.|
|000032e0| 32 3a f2 73 28 58 28 32 | 29 2c 59 28 32 29 29 3a |2:.s(X(2|),Y(2)):|
|000032f0| f2 62 3a ed 3a f2 73 28 | 58 28 34 29 2c 59 28 34 |.b:.:.s(|X(4),Y(4|
|00003300| 29 29 3a e3 50 3d 31 b8 | 32 3a f2 73 28 58 28 31 |)):.P=1.|2:.s(X(1|
|00003310| 29 2c 59 28 31 29 29 3a | f2 62 3a ed 0d 0a 0a 46 |),Y(1)):|.b:....F|
|00003320| 20 e7 4e 25 3d 31 30 f2 | 62 3a e3 50 3d 31 b8 32 | .N%=10.|b:.P=1.2|
|00003330| 3a f2 73 28 58 28 32 29 | 2c 59 28 32 29 29 3a f2 |:.s(X(2)|,Y(2)):.|
|00003340| 62 3a ed 3a f2 73 28 58 | 28 31 29 2c 59 28 31 29 |b:.:.s(X|(1),Y(1)|
|00003350| 29 3a f2 62 3a f2 73 28 | 58 28 32 29 2c 59 28 32 |):.b:.s(|X(2),Y(2|
|00003360| 29 29 0d 0a 14 4e 20 e7 | 4e 25 3d 31 31 f2 62 3a |))...N .|N%=11.b:|
|00003370| f2 73 28 58 28 32 29 2c | 59 28 32 29 29 3a f2 62 |.s(X(2),|Y(2)):.b|
|00003380| 3a f2 73 28 58 28 31 29 | 2c 59 28 31 29 29 3a f2 |:.s(X(1)|,Y(1)):.|
|00003390| 62 3a f2 73 28 58 28 32 | 29 2c 59 28 32 29 29 3a |b:.s(X(2|),Y(2)):|
|000033a0| f2 62 3a f2 73 28 58 28 | 31 29 2c 59 28 31 29 29 |.b:.s(X(|1),Y(1))|
|000033b0| 0d 0a 1e 3f 20 e7 4e 25 | 3d 31 32 f2 62 3a e3 50 |...? .N%|=12.b:.P|
|000033c0| 3d 31 b8 33 3a f2 73 28 | 58 28 32 29 2c 59 28 32 |=1.3:.s(|X(2),Y(2|
|000033d0| 29 29 3a f2 62 3a ed 3a | f2 73 28 58 28 31 29 2b |)):.b:.:|.s(X(1)+|
|000033e0| 58 28 34 29 2c 59 28 31 | 29 2b 59 28 34 29 29 0d |X(4),Y(1|)+Y(4)).|
|000033f0| 0a 28 07 20 f2 62 0d 0a | 32 27 20 ec 51 2c 52 3a |.(. .b..|2' .Q,R:|
|00003400| 58 3d 51 3a 59 3d 52 3a | e6 30 2c 4a 3a e7 65 3d |X=Q:Y=R:|.0,J:.e=|
|00003410| 31 20 80 20 70 3d 31 3a | f2 44 72 61 77 0d 0a 3c |1 . p=1:|.Draw..<|
|00003420| 06 20 e1 0d 0a 46 08 20 | dd f2 62 0d 0a 50 2f 20 |. ...F. |..b..P/ |
|00003430| 54 45 53 54 3d b0 58 2b | 28 28 58 28 31 29 2b 58 |TEST=.X+|((X(1)+X|
|00003440| 28 32 29 29 2f 32 29 2c | 59 2b 28 28 59 28 31 29 |(2))/2),|Y+((Y(1)|
|00003450| 2b 59 28 32 29 29 2f 32 | 29 29 0d 0a 5a 2c 20 e7 |+Y(2))/2|))..Z, .|
|00003460| 20 28 4c 3d 38 31 20 80 | 20 44 65 6c 65 74 65 3d | (L=81 .| Delete=|
|00003470| 30 20 80 20 54 45 53 54 | 3d 57 57 57 29 20 4f 6e |0 . TEST|=WWW) On|
|00003480| 54 6f 70 25 3d 31 0d 0a | 64 25 20 e7 20 28 54 45 |Top%=1..|d% . (TE|
|00003490| 53 54 3d 57 20 84 20 54 | 45 53 54 3d 2d 31 29 4f |ST=W . T|EST=-1)O|
|000034a0| 75 74 4f 66 47 72 69 64 | 25 3d 31 0d 0a 6e 3d 20 |utOfGrid|%=1..n= |
|000034b0| e7 70 3d 31 20 f0 31 2c | 58 28 32 29 2c 59 28 32 |.p=1 .1,|X(2),Y(2|
|000034c0| 29 3a f0 4c 2c 58 28 31 | 29 2c 59 28 31 29 3a f0 |):.L,X(1|),Y(1):.|
|000034d0| 31 2c 58 28 34 29 2c 59 | 28 34 29 3a f0 4c 2c 58 |1,X(4),Y|(4):.L,X|
|000034e0| 28 33 29 2c 59 28 33 29 | 0d 0a 78 06 20 e1 0d 0a |(3),Y(3)|..x. ...|
|000034f0| 82 0c 20 dd f2 55 73 65 | 64 3a 0d 0a 8c 36 20 e7 |.. ..Use|d:...6 .|
|00003500| 4e 25 3d 31 33 20 84 4e | 25 3d 31 35 84 4e 25 3d |N%=13 .N|%=15.N%=|
|00003510| 31 36 84 4e 25 3d 31 37 | 84 4b 25 3d 31 20 84 20 |16.N%=17|.K%=1 . |
|00003520| 4e 25 3d 31 34 20 55 28 | 4e 25 29 3d 30 3a e1 3a |N%=14 U(|N%)=0:.:|
|00003530| 0d 0a 96 47 20 e7 55 28 | 4e 25 29 3d 4e 25 80 56 |...G .U(|N%)=N%.V|
|00003540| 25 3d 31 3a ec 30 2c 32 | 35 30 3a f2 50 72 69 6e |%=1:.0,2|50:.Prin|
|00003550| 74 28 22 55 73 65 64 22 | 2c 38 30 2c 32 35 30 29 |t("Used"|,80,250)|
|00003560| 3a e3 5a 25 3d 30 b8 34 | 30 30 30 30 3a ed 3a f2 |:.Z%=0.4|0000:.:.|
|00003570| 42 4c 41 4e 4b 3a e1 0d | 0a a0 43 20 e7 55 28 4e |BLANK:..|..C .U(N|
|00003580| 25 29 3d 4e 25 3a f2 42 | 4c 41 4e 4b 3a f2 50 72 |%)=N%:.B|LANK:.Pr|
|00003590| 69 6e 74 28 22 55 73 65 | 64 22 2c 36 30 30 2c 35 |int("Use|d",600,5|
|000035a0| 31 35 29 3a e3 5a 25 3d | 30 b8 34 30 30 30 30 3a |15):.Z%=|0.40000:|
|000035b0| ed 3a f2 42 4c 41 4e 4b | 3a e1 0d 0a aa 11 20 dd |.:.BLANK|:..... .|
|000035c0| f2 42 6c 61 6e 6b 4d 65 | 6e 75 3a 0d 0a b4 20 20 |.BlankMe|nu:...  |
|000035d0| ef 32 34 2c 30 3b 36 31 | 30 3b 31 32 37 39 3b 31 |.24,0;61|0;1279;1|
|000035e0| 30 32 33 3b 3a da 3a ef | 32 36 3a 0d 0a be 06 20 |023;:.:.|26:.... |
|000035f0| e1 0d 0a c8 0d 20 dd f2 | 42 4c 41 4e 4b 3a 0d 0a |..... ..|BLANK:..|
|00003600| d2 34 20 e7 20 56 25 3d | 31 20 8c 20 ef 32 34 2c |.4 . V%=|1 . .24,|
|00003610| 30 3b 30 3b 32 36 38 3b | 36 30 30 3b 20 8b 20 ef |0;0;268;|600; . .|
|00003620| 32 34 2c 30 3b 35 31 31 | 3b 31 32 37 30 3b 36 30 |24,0;511|;1270;60|
|00003630| 35 3b 0d 0a d7 0c 20 da | 3a ef 32 36 3a e1 0d 0a |5;.... .|:.26:...|
|00003640| dc 22 20 dd f2 45 72 72 | 6f 72 3a e7 20 9f 3d 31 |." ..Err|or:. .=1|
|00003650| 37 20 8c 20 db 3a 43 25 | 3d 39 3a e5 8d 74 74 40 |7 . .:C%|=9:..tt@|
|00003660| 0d 0a e6 07 20 ef 34 0d | 0a f0 0b 20 2a 46 58 34 |.... .4.|... *FX4|
|00003670| 2c 30 0d 0a fa 06 20 f6 | 0d 0b 04 13 20 f1 22 20 |,0.... .|.... ." |
|00003680| 61 74 20 6c 69 6e 65 20 | 22 3b 9e 0d 0b 0e 0d 20 |at line |";..... |
|00003690| f4 20 2a 4e 4f 44 49 52 | 0d 0b 18 08 20 e0 3a e1 |. *NODIR|.... .:.|
|000036a0| 0d 0b 22 15 20 dd f2 50 | 72 69 6e 74 28 53 24 2c |..". ..P|rint(S$,|
|000036b0| 58 2c 59 29 3a 0d 0b 2c | 6a 20 e7 20 53 49 5a 45 |X,Y):..,|j . SIZE|
|000036c0| 3d 31 3a 46 4f 4e 54 25 | 3d 39 3a 48 65 69 67 68 |=1:FONT%|=9:Heigh|
|000036d0| 74 3d 32 30 3a 57 69 64 | 74 68 3d 33 35 3a 8b 20 |t=20:Wid|th=35:. |
|000036e0| 48 65 69 67 68 74 3d 31 | 35 3a 57 69 64 74 68 3d |Height=1|5:Width=|
|000036f0| 32 33 3a 46 4f 4e 54 25 | 3d 31 32 3a ef 20 32 33 |23:FONT%|=12:. 23|
|00003700| 2c 32 35 2c 26 38 38 2c | 31 32 2c 52 32 2c 42 32 |,25,&88,|12,R2,B2|
|00003710| 2c 47 32 2c 31 30 30 2c | 32 30 30 2c 32 35 30 0d |,G2,100,|200,250.|
|00003720| 0b 36 19 20 f4 20 53 65 | 74 20 46 6f 6e 74 20 44 |.6. . Se|t Font D|
|00003730| 69 72 65 63 74 6f 72 79 | 0d 0b 40 26 20 2a 53 45 |irectory|..@& *SE|
|00003740| 54 20 46 6f 6e 74 24 50 | 72 65 66 69 78 20 3c 50 |T Font$P|refix <P|
|00003750| 6f 6c 79 24 44 69 72 3e | 2e 46 4f 4e 54 53 0d 0b |oly$Dir>|.FONTS..|
|00003760| 4a 1c 20 f4 20 53 65 74 | 20 54 72 61 6e 73 66 65 |J. . Set| Transfe|
|00003770| 72 20 46 75 6e 63 74 69 | 6f 6e 0d 0b 54 1e 20 ef |r Functi|on..T. .|
|00003780| 32 33 2c 32 35 2c 32 2c | 32 2c 34 2c 36 2c 38 2c |23,25,2,|2,4,6,8,|
|00003790| 31 30 2c 31 32 2c 31 34 | 0d 0b 5e 20 20 f4 20 53 |10,12,14|..^  . S|
|000037a0| 65 74 20 41 6e 74 69 2d | 41 6c 69 61 73 69 6e 67 |et Anti-|Aliasing|
|000037b0| 20 50 61 6c 65 74 74 65 | 0d 0b 68 24 20 ef 20 32 | Palette|..h$ . 2|
|000037c0| 33 2c 32 35 2c 26 38 38 | 2c 39 2c 52 32 2c 47 32 |3,25,&88|,9,R2,G2|
|000037d0| 2c 42 32 2c 43 31 2c 43 | 32 2c 43 33 0d 0b 72 1a |,B2,C1,C|2,C3..r.|
|000037e0| 20 f4 20 43 61 63 68 65 | 20 72 65 71 75 69 72 65 | . Cache| require|
|000037f0| 64 20 46 6f 6e 74 0d 0b | 7c 49 20 c8 99 20 22 46 |d Font..||I .. "F|
|00003800| 6f 6e 74 5f 46 69 6e 64 | 46 6f 6e 74 22 2c 2c 22 |ont_Find|Font",,"|
|00003810| 43 4f 52 50 55 53 2e 4d | 65 64 69 75 6d 22 2c 48 |CORPUS.M|edium",H|
|00003820| 65 69 67 68 74 2a 31 36 | 2c 57 69 64 74 68 2a 31 |eight*16|,Width*1|
|00003830| 36 2c 30 2c 30 20 b8 20 | 68 61 6e 64 6c 65 25 0d |6,0,0 . |handle%.|
|00003840| 0b 86 11 20 f4 20 50 61 | 69 6e 74 20 46 6f 6e 74 |... . Pa|int Font|
|00003850| 0d 0b 90 32 20 c8 99 20 | 22 46 6f 6e 74 5f 50 61 |...2 .. |"Font_Pa|
|00003860| 69 6e 74 22 2c 2c bd 28 | 31 37 29 2b bd 28 46 4f |int",,.(|17)+.(FO|
|00003870| 4e 54 25 29 2b 53 24 2c | 25 31 30 30 30 30 2c 58 |NT%)+S$,|%10000,X|
|00003880| 2c 59 0d 0b 9a 0b 20 f2 | 53 48 49 46 54 0d 0b a4 |,Y.... .|SHIFT...|
|00003890| 06 20 e1 0d 0b ae 05 20 | 0d 0b b8 14 20 dd f2 49 |. ..... |.... ..I|
|000038a0| 4e 28 78 2c 79 29 3a 42 | 24 3d 22 22 0d 0b c2 0d |N(x,y):B|$=""....|
|000038b0| 20 f5 20 51 3d a6 28 31 | 29 0d 0b cc 24 20 e7 20 | . Q=.(1|)...$ . |
|000038c0| 28 51 3c 3e 2d 31 20 80 | 20 51 3c 3e 31 32 37 29 |(Q<>-1 .| Q<>127)|
|000038d0| 20 8c 20 42 24 3d 42 24 | 2b bd 28 51 29 0d 0b d6 | . B$=B$|+.(Q)...|
|000038e0| 1b 20 e7 a9 28 42 24 29 | 3d 31 30 20 ef 37 3a 42 |. ..(B$)|=10 .7:B|
|000038f0| 24 3d c0 42 24 2c 39 29 | 0d 0b e0 38 20 e7 51 3d |$=.B$,9)|...8 .Q=|
|00003900| 31 32 37 20 42 24 3d c0 | 42 24 2c 28 a9 28 42 24 |127 B$=.|B$,(.(B$|
|00003910| 29 2d 31 29 29 3a ef 32 | 34 2c 78 3b 79 2d 35 3b |)-1)):.2|4,x;y-5;|
|00003920| 31 32 37 39 3b 79 2b 37 | 30 3b 3a da 3a ef 32 36 |1279;y+7|0;:.:.26|
|00003930| 0d 0b ea 13 20 f2 50 72 | 69 6e 74 28 42 24 2c 78 |.... .Pr|int(B$,x|
|00003940| 2c 79 29 0d 0b f4 0b 20 | fd 20 51 3d 31 33 0d 0b |,y).... |. Q=13..|
|00003950| fe 07 20 e1 3a 0d 0c 08 | 05 20 0d 0c 12 2e 20 f4 |.. .:...|. .... .|
|00003960| 2e 2e 2e 2e 2e 2e 50 52 | 4f 43 20 46 4f 52 20 43 |......PR|OC FOR C|
|00003970| 52 45 41 54 49 4e 47 20 | 50 49 45 43 45 20 46 49 |REATING |PIECE FI|
|00003980| 4c 45 53 2e 2e 2e 2e 2e | 0d 0c 1c 1b 20 2a 43 44 |LES.....|.... *CD|
|00003990| 49 52 20 3c 50 6f 6c 79 | 24 44 69 72 3e 2e 47 52 |IR <Poly|$Dir>.GR|
|000039a0| 49 44 30 0d 0c 26 1a 20 | 2a 44 49 52 20 3c 50 6f |ID0..&. |*DIR <Po|
|000039b0| 6c 79 24 44 69 72 3e 2e | 47 52 49 44 30 0d 0c 30 |ly$Dir>.|GRID0..0|
|000039c0| 0e 20 5a 24 3d 22 45 4e | 44 22 3a 0d 0c 3a 11 20 |. Z$="EN|D":..:. |
|000039d0| 4a 25 3d ae 22 47 52 49 | 44 53 22 3a 0d 0c 44 0b |J%=."GRI|DS":..D.|
|000039e0| 20 54 25 3d 30 20 3a 0d | 0c 4e 10 20 f1 23 4a 25 | T%=0 :.|.N. .#J%|
|000039f0| 2c 5a 24 2c 54 25 3a 0d | 0c 58 08 20 d9 23 30 0d |,Z$,T%:.|.X. .#0.|
|00003a00| 0c 62 0d 20 f4 20 2a 4e | 4f 44 49 52 0d 0c 6c 06 |.b. . *N|ODIR..l.|
|00003a10| 20 e0 0d 0c 76 20 20 dd | f2 43 48 45 53 53 3a 46 | ...v  .|.CHESS:F|
|00003a20| 25 3d 30 3a f2 46 49 4c | 4c 47 52 49 44 3a ec 43 |%=0:.FIL|LGRID:.C|
|00003a30| 2c 44 0d 0c 80 15 20 4c | 3d 38 31 3a e6 30 2c 30 |,D.... L|=81:.0,0|
|00003a40| 3a f2 52 3a 70 3d 31 0d | 0c 8a 0c 20 c8 8e 20 56 |:.R:p=1.|... .. V|
|00003a50| 25 20 ca 0d 0c 94 11 20 | c9 20 36 20 20 3a f7 20 |% ..... |. 6  :. |
|00003a60| 8d 64 50 4c 0d 0c 9e 11 | 20 c9 20 38 20 20 3a f7 |.dPL....| . 8  :.|
|00003a70| 20 8d 64 5a 4c 0d 0c a8 | 11 20 c9 20 39 20 20 3a | .dZL...|. . 9  :|
|00003a80| f7 20 8d 64 64 4c 0d 0c | b2 11 20 c9 20 30 20 20 |. .ddL..|.. . 0  |
|00003a90| 3a f7 20 8d 64 6e 4c 0d | 0c bc 06 20 cb 0d 0c c6 |:. .dnL.|... ....|
|00003aa0| 05 20 0d 0c d0 16 20 dc | 20 31 2c 31 2c 36 2c 31 |. .... .| 1,1,6,1|
|00003ab0| 2c 31 2c 36 2c 36 2c 36 | 0d 0c da 16 20 dc 20 32 |,1,6,6,6|.... . 2|
|00003ac0| 2c 35 2c 35 2c 32 2c 32 | 2c 32 2c 35 2c 35 0d 0c |,5,5,2,2|,2,5,5..|
|00003ad0| e4 16 20 dc 20 35 2c 32 | 2c 34 2c 33 2c 33 2c 34 |.. . 5,2|,4,3,3,4|
|00003ae0| 2c 32 2c 35 0d 0c ee 16 | 20 dc 20 35 2c 33 2c 34 |,2,5....| . 5,3,4|
|00003af0| 2c 35 2c 33 2c 32 2c 32 | 2c 34 0d 0c f8 05 20 0d |,5,3,2,2|,4.... .|
|00003b00| 0d 02 40 20 e7 28 56 25 | 3c 3e 35 20 80 20 56 25 |..@ .(V%|<>5 . V%|
|00003b10| 3c 3e 37 29 20 e3 20 5a | 5a 5a 25 3d 31 20 b8 20 |<>7) . Z|ZZ%=1 . |
|00003b20| 34 3a f3 20 61 2c 62 3a | f0 20 30 2c 61 2a 57 25 |4:. a,b:|. 0,a*W%|
|00003b30| 2c 62 2a 57 25 3a f2 62 | 3a ec 43 2c 44 3a ed 0d |,b*W%:.b|:.C,D:..|
|00003b40| 0d 0c 0a 20 f2 47 72 69 | 64 0d 0d 16 12 20 e7 56 |... .Gri|d.... .V|
|00003b50| 25 3d 35 3a f7 20 8d 54 | 6a 4d 3a 0d 0d 20 11 20 |%=5:. .T|jM:.. . |
|00003b60| e7 56 25 3d 37 3a f7 20 | 8d 54 74 4d 0d 0d 2a 16 |.V%=7:. |.TtM..*.|
|00003b70| 20 dc 20 30 2c 30 2c 37 | 2c 30 2c 30 2c 37 2c 37 | . 0,0,7|,0,0,7,7|
|00003b80| 2c 37 0d 0d 34 16 20 dc | 20 33 2c 33 2c 34 2c 33 |,7..4. .| 3,3,4,3|
|00003b90| 2c 33 2c 34 2c 34 2c 34 | 0d 0d 3e 26 20 e7 28 56 |,3,4,4,4|..>& .(V|
|00003ba0| 25 3d 35 20 84 20 56 25 | 3d 37 29 20 e3 20 5a 5a |%=5 . V%|=7) . ZZ|
|00003bb0| 5a 25 3d 31 20 b8 20 34 | 3a f3 20 61 2c 62 0d 0d |Z%=1 . 4|:. a,b..|
|00003bc0| 48 2e 20 e7 28 56 25 3d | 35 20 84 20 56 25 3d 37 |H. .(V%=|5 . V%=7|
|00003bd0| 29 e6 30 2c 30 3a f0 30 | 2c 61 2a 57 25 2c 62 2a |).0,0:.0|,a*W%,b*|
|00003be0| 57 25 3a f2 62 3a ec 43 | 2c 44 3a ed 0d 0d 52 1a |W%:.b:.C|,D:...R.|
|00003bf0| 20 e7 28 56 25 3d 35 20 | 84 20 56 25 3d 37 29 ec | .(V%=5 |. V%=7).|
|00003c00| 43 2c 44 2b 57 25 0d 0d | 5c 3f 20 e7 20 56 25 3d |C,D+W%..|\? . V%=|
|00003c10| 35 20 e6 30 2c 34 3a f0 | 31 2c 57 25 2c 30 3a f0 |5 .0,4:.|1,W%,0:.|
|00003c20| 31 2c 30 2c 2d 57 25 3a | f0 30 2c 2d 57 25 2c 28 |1,0,-W%:|.0,-W%,(|
|00003c30| 57 25 2a 37 29 3a f0 31 | 2c 57 25 2c 30 3a f0 31 |W%*7):.1|,W%,0:.1|
|00003c40| 2c 30 2c 57 25 0d 0d 66 | 50 20 e7 56 25 3d 35 20 |,0,W%..f|P .V%=5 |
|00003c50| f0 30 2c 28 57 25 2a 36 | 29 2c 30 3a f0 31 2c 30 |.0,(W%*6|),0:.1,0|
|00003c60| 2c 2d 57 25 3a f0 31 2c | 57 25 2c 30 3a f0 30 2c |,-W%:.1,|W%,0:.0,|
|00003c70| 2d 57 25 2c 2d 28 57 25 | 2a 36 29 3a f0 31 2c 57 |-W%,-(W%|*6):.1,W|
|00003c80| 25 2c 30 3a f0 30 2c 2d | 57 25 2c 30 3a f0 31 2c |%,0:.0,-|W%,0:.1,|
|00003c90| 30 2c 2d 57 25 0d 0d 70 | 4a 20 e7 56 25 3d 37 20 |0,-W%..p|J .V%=7 |
|00003ca0| e6 30 2c 34 3a f0 30 2c | 28 57 25 2a 33 29 2c 28 |.0,4:.0,|(W%*3),(|
|00003cb0| 57 25 2a 32 29 3a f0 31 | 2c 32 2a 57 25 2c 30 3a |W%*2):.1|,2*W%,0:|
|00003cc0| f0 31 2c 30 2c 32 2a 57 | 25 3a f0 31 2c 2d 32 2a |.1,0,2*W|%:.1,-2*|
|00003cd0| 57 25 2c 30 3a f0 31 2c | 30 2c 2d 32 2a 57 25 0d |W%,0:.1,|0,-2*W%.|
|00003ce0| 0d 7a 06 20 e1 0d 0d 84 | 05 20 0d 0d 8e 0d 20 dd |.z. ....|. .... .|
|00003cf0| f2 73 28 41 2c 42 29 0d | 0d 98 0f 20 ef 32 35 2c |.s(A,B).|... .25,|
|00003d00| 30 2c 41 3b 42 3b 0d 0d | a2 10 20 58 3d 58 2b 41 |0,A;B;..|.. X=X+A|
|00003d10| 3a 59 3d 59 2b 42 0d 0d | ac 25 20 f4 20 56 44 55 |:Y=Y+B..|.% . VDU|
|00003d20| 34 3a 50 52 49 4e 54 54 | 41 42 28 30 2c 31 29 41 |4:PRINTT|AB(0,1)A|
|00003d30| 2c 42 2c 58 2c 59 3a 56 | 44 55 35 0d 0d b6 14 20 |,B,X,Y:V|DU5.... |
|00003d40| f4 49 46 4c 3d 38 31 20 | 58 3d 51 3a 59 3d 52 0d |.IFL=81 |X=Q:Y=R.|
|00003d50| 0d c0 06 20 e1 0d 0d ca | 0d 20 20 dd f2 53 48 49 |... ....|.  ..SHI|
|00003d60| 46 54 0d 0d d4 11 20 20 | e7 20 53 48 49 46 54 3d |FT....  |. SHIFT=|
|00003d70| 31 20 e1 0d 0d de 1c 20 | 20 f5 20 51 51 3d 51 51 |1 ..... | . QQ=QQ|
|00003d80| 2b 31 3a fd 51 51 3e 34 | 30 30 3a 51 51 3d 30 0d |+1:.QQ>4|00:QQ=0.|
|00003d90| 0d e8 0e 20 20 c8 97 20 | b8 20 58 2c 59 0d 0d f2 |...  .. |. X,Y...|
|00003da0| 0e 20 20 2a 50 4f 49 4e | 54 45 52 0d 0d fc 0a 20 |.  *POIN|TER.... |
|00003db0| 20 c8 97 20 ee 0d 0e 06 | 0e 20 20 c8 97 20 78 2c | .. ....|.  .. x,|
|00003dc0| 79 2c 7a 0d 0e 10 2b 20 | 20 e7 7a 20 3d 34 20 f2 |y,z...+ | .z =4 .|
|00003dd0| 50 72 69 6e 74 28 53 24 | 2c 78 2c 79 29 3a f2 50 |Print(S$|,x,y):.P|
|00003de0| 72 69 6e 74 28 53 24 2c | 78 2c 79 29 3a e1 0d 0e |rint(S$,|x,y):...|
|00003df0| 1a 16 20 20 ef 34 3a f1 | 8a 30 2c 30 29 3b 78 2c |..  .4:.|.0,0);x,|
|00003e00| 79 3a ef 35 0d 0e 24 0f | 20 20 e7 7a 3d 31 3a c8 |y:.5..$.|  .z=1:.|
|00003e10| 97 20 87 0d 0e 2e 0c 20 | 20 e7 7a 3d 31 20 e1 0d |. ..... | .z=1 ..|
|00003e20| 0e 38 0b 20 20 e5 8d 54 | 46 4e 0d 0e 42 0b 20 dd |.8.  ..T|FN..B. .|
|00003e30| f2 57 61 69 74 0d 0e 4c | 13 20 e3 20 77 3d 30 20 |.Wait..L|. . w=0 |
|00003e40| b8 20 57 61 69 74 3a ed | 0d 0e 56 06 20 e1 0d ff |. Wait:.|..V. ...|
+--------+-------------------------+-------------------------+--------+--------+